haskell-src-exts-1.24.0: tests/examples/THTypes.hs.parser.golden
ParseOk
( 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
]
]
, []
)