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