haskell-src-exts-1.24.0: tests/examples/T326.hs.parser.golden
ParseOk
( Module
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 1 1 5 1
, srcInfoPoints =
[ SrcSpan "tests/examples/T326.hs" 1 1 1 1
, SrcSpan "tests/examples/T326.hs" 2 1 2 1
, SrcSpan "tests/examples/T326.hs" 2 1 2 1
, SrcSpan "tests/examples/T326.hs" 4 1 4 1
, SrcSpan "tests/examples/T326.hs" 5 1 5 1
, SrcSpan "tests/examples/T326.hs" 5 1 5 1
]
}
(Just
(ModuleHead
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 2 1 2 18
, srcInfoPoints =
[ SrcSpan "tests/examples/T326.hs" 2 1 2 7
, SrcSpan "tests/examples/T326.hs" 2 13 2 18
]
}
(ModuleName
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 2 8 2 12
, srcInfoPoints = []
}
"T326")
Nothing
Nothing))
[ LanguagePragma
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 1 1 1 34
, srcInfoPoints =
[ SrcSpan "tests/examples/T326.hs" 1 1 1 13
, SrcSpan "tests/examples/T326.hs" 1 31 1 34
]
}
[ Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 1 14 1 30
, srcInfoPoints = []
}
"TypeApplications"
]
]
[]
[ FunBind
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 1 4 13
, srcInfoPoints = []
}
[ Match
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 1 4 13
, srcInfoPoints =
[ SrcSpan "tests/examples/T326.hs" 4 1 4 2
, SrcSpan "tests/examples/T326.hs" 4 2 4 4
, SrcSpan "tests/examples/T326.hs" 4 4 4 5
]
}
(Symbol
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 2 4 4
, srcInfoPoints = []
}
"@:")
[ PVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 6 4 7
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 6 4 7
, srcInfoPoints = []
}
"a")
, PVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 8 4 9
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 8 4 9
, srcInfoPoints = []
}
"b")
]
(UnGuardedRhs
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 10 4 13
, srcInfoPoints = [ SrcSpan "tests/examples/T326.hs" 4 10 4 11 ]
}
(Var
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 12 4 13
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 12 4 13
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/T326.hs" 4 12 4 13
, srcInfoPoints = []
}
"a"))))
Nothing
]
]
, []
)