ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 4 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 4 1 4 1
            , SrcSpan "tests/examples/TyQuasiQuote.hs" 4 1 4 1
            ]
        }
      Nothing
      [ LanguagePragma
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 46
            , srcInfoPoints =
                [ SrcSpan "tests/examples/TyQuasiQuote.hs" 1 1 1 13
                , SrcSpan "tests/examples/TyQuasiQuote.hs" 1 25 1 26
                , SrcSpan "tests/examples/TyQuasiQuote.hs" 1 43 1 46
                ]
            }
          [ Ident
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 14 1 25
                , srcInfoPoints = []
                }
              "QuasiQuotes"
          , Ident
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 1 27 1 42
                , srcInfoPoints = []
                }
              "TemplateHaskell"
          ]
      ]
      []
      [ TypeSig
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 31
            , srcInfoPoints =
                [ SrcSpan "tests/examples/TyQuasiQuote.hs" 2 3 2 5 ]
            }
          [ Ident
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 1 2 2
                , srcInfoPoints = []
                }
              "f"
          ]
          (TyQuasiQuote
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 2 6 2 31
               , srcInfoPoints = []
               }
             "qq"
             " something in here ")
      , PatBind
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 7
            , srcInfoPoints = []
            }
          (PVar
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 2
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 1 3 2
                  , srcInfoPoints = []
                  }
                "f"))
          (UnGuardedRhs
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 3 3 7
               , srcInfoPoints =
                   [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 3 3 4 ]
               }
             (Con
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7
                  , srcInfoPoints =
                      [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6
                      , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7
                      ]
                  }
                (Special
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7
                     , srcInfoPoints =
                         [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6
                         , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7
                         ]
                     }
                   (UnitCon
                      SrcSpanInfo
                        { srcInfoSpan = SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 7
                        , srcInfoPoints =
                            [ SrcSpan "tests/examples/TyQuasiQuote.hs" 3 5 3 6
                            , SrcSpan "tests/examples/TyQuasiQuote.hs" 3 6 3 7
                            ]
                        }))))
          Nothing
      ]
  , []
  )