ParseOk (Module (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 5 1, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 1,SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1,SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1,SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 1,SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1,SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 1]}) Nothing [LanguagePragma (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 23, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 1 1 1 13,SrcSpan "tests/examples/GadtStrictness.hs" 1 20 1 23]}) [Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 1 14 1 19, srcInfoPoints = []}) "GADTs"]] [] [GDataDecl (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 5 0, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 3 8 3 13,SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 3,SrcSpan "tests/examples/GadtStrictness.hs" 5 1 5 0]}) (DataType (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 1 3 5, srcInfoPoints = []})) Nothing (DHead (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 3 6 3 7, srcInfoPoints = []}) "X")) Nothing [GadtDecl (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 17, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 4 5 4 7]}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 3 4 4, srcInfoPoints = []}) "X") Nothing (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 17, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 4 13 4 15]}) (TyBang (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 12, srcInfoPoints = []}) (BangedTy (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 9, srcInfoPoints = [SrcSpan "tests/examples/GadtStrictness.hs" 4 8 4 9]})) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 9 4 12, srcInfoPoints = []}) "Int")))) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan "tests/examples/GadtStrictness.hs" 4 16 4 17, srcInfoPoints = []}) "X"))))] Nothing],[])