haskell-src-exts-1.21.0: tests/examples/Unpack.hs.parser.golden
ParseOk
( Module
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 1 7 1
, srcInfoPoints =
[ SrcSpan "tests/examples/Unpack.hs" 1 1 1 1
, SrcSpan "tests/examples/Unpack.hs" 3 1 3 1
, SrcSpan "tests/examples/Unpack.hs" 3 1 3 1
, SrcSpan "tests/examples/Unpack.hs" 3 1 3 1
, SrcSpan "tests/examples/Unpack.hs" 6 1 6 1
, SrcSpan "tests/examples/Unpack.hs" 7 1 7 1
, SrcSpan "tests/examples/Unpack.hs" 7 1 7 1
]
}
Nothing
[ LanguagePragma
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 1 1 23
, srcInfoPoints =
[ SrcSpan "tests/examples/Unpack.hs" 1 1 1 13
, SrcSpan "tests/examples/Unpack.hs" 1 20 1 23
]
}
[ Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 1 14 1 19
, srcInfoPoints = []
}
"GADTs"
]
]
[]
[ GDataDecl
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 1 6 0
, srcInfoPoints =
[ SrcSpan "tests/examples/Unpack.hs" 3 18 3 23
, SrcSpan "tests/examples/Unpack.hs" 4 9 4 9
, SrcSpan "tests/examples/Unpack.hs" 6 1 6 0
]
}
(DataType
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 1 3 5
, srcInfoPoints = []
})
Nothing
(DHApp
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 17
, srcInfoPoints = []
}
(DHApp
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 15
, srcInfoPoints = []
}
(DHead
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 13
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 6 3 13
, srcInfoPoints = []
}
"CmmNode"))
(UnkindedVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 14 3 15
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 14 3 15
, srcInfoPoints = []
}
"e")))
(UnkindedVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 16 3 17
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 3 16 3 17
, srcInfoPoints = []
}
"x")))
Nothing
[ GadtDecl
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 9 4 55
, srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 4 18 4 20 ]
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 9 4 17
, srcInfoPoints = []
}
"CmmEntry")
Nothing
Nothing
Nothing
(TyFun
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 55
, srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 4 41 4 43 ]
}
(TyBang
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 40
, srcInfoPoints = []
}
(BangedTy
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 36 4 37
, srcInfoPoints = []
})
(Unpack
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 35
, srcInfoPoints =
[ SrcSpan "tests/examples/Unpack.hs" 4 21 4 31
, SrcSpan "tests/examples/Unpack.hs" 4 32 4 35
]
})
(TyCon
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 37 4 40
, srcInfoPoints = []
}
"Int"))))
(TyApp
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 55
, srcInfoPoints = []
}
(TyApp
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 53
, srcInfoPoints = []
}
(TyCon
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 44 4 51
, srcInfoPoints = []
}
"CmmNode")))
(TyVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 52 4 53
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 52 4 53
, srcInfoPoints = []
}
"e")))
(TyVar
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 54 4 55
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 54 4 55
, srcInfoPoints = []
}
"x"))))
]
[]
, DataDecl
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 1 6 33
, srcInfoPoints = [ SrcSpan "tests/examples/Unpack.hs" 6 9 6 10 ]
}
(DataType
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 1 6 5
, srcInfoPoints = []
})
Nothing
(DHead
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 6 6 8
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 6 6 8
, srcInfoPoints = []
}
"UI"))
[ QualConDecl
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 33
, srcInfoPoints = []
}
Nothing
Nothing
(ConDecl
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 33
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 11 6 13
, srcInfoPoints = []
}
"UI")
[ TyBang
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 14 6 33
, srcInfoPoints = []
}
(BangedTy
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 29 6 30
, srcInfoPoints = []
})
(Unpack
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 14 6 28
, srcInfoPoints =
[ SrcSpan "tests/examples/Unpack.hs" 6 14 6 24
, SrcSpan "tests/examples/Unpack.hs" 6 25 6 28
]
})
(TyCon
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33
, srcInfoPoints = []
}
(UnQual
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33
, srcInfoPoints = []
}
(Ident
SrcSpanInfo
{ srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 30 6 33
, srcInfoPoints = []
}
"Int")))
])
]
[]
]
, []
)