ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 5 1 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 5 1 5 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 2 4 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 1 1 13 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 1 , SrcSpan "tests/examples/UnindentedPragmaClose.hs" 2 1 2 4 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 1 14 1 35 , srcInfoPoints = [] } "MultiParamTypeClasses" ] ] [] [ TypeSig SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 9 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 3 3 5 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 1 3 2 , srcInfoPoints = [] } "f" ] (TyCon SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } (UnQual SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 3 6 3 9 , srcInfoPoints = [] } "Int"))) , PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 6 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 1 4 2 , srcInfoPoints = [] } "f")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 6 , srcInfoPoints = [ SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 3 4 4 ] } (Lit SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 , srcInfoPoints = [] } (Int SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/UnindentedPragmaClose.hs" 4 5 4 6 , srcInfoPoints = [] } 4 "4"))) Nothing ] , [] )