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 (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 = []}) (UnpackedTy (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 4 21 4 37, srcInfoPoints = [SrcSpan "tests/examples/Unpack.hs" 4 21 4 31,SrcSpan "tests/examples/Unpack.hs" 4 32 4 35,SrcSpan "tests/examples/Unpack.hs" 4 36 4 37]})) (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"))))] Nothing,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 = []}) (UnpackedTy (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/Unpack.hs" 6 14 6 30, srcInfoPoints = [SrcSpan "tests/examples/Unpack.hs" 6 14 6 24,SrcSpan "tests/examples/Unpack.hs" 6 25 6 28,SrcSpan "tests/examples/Unpack.hs" 6 29 6 30]})) (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")))])] Nothing],[])