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