haskell-src-exts-1.22.0: tests/examples/CxtWhitespace.hs.parser.golden
ParseOk
( 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"
]
)