packages feed

haskell-src-exts-1.24.0: tests/examples/HaskellParser.hs.parser.golden

ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 1 17 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1
            , SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1
            , SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 1
            , SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 1
            , SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 1
            , SrcSpan "tests/examples/HaskellParser.hs" 5 1 5 1
            , SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 1
            , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 1
            , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 1
            ]
        }
      Nothing
      []
      [ ImportDecl
          { importAnn =
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 59
                , srcInfoPoints =
                    [ SrcSpan "tests/examples/HaskellParser.hs" 1 1 1 7
                    , SrcSpan "tests/examples/HaskellParser.hs" 1 8 1 17
                    , SrcSpan "tests/examples/HaskellParser.hs" 1 50 1 52
                    ]
                }
          , importModule =
              ModuleName
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 18 1 49
                  , srcInfoPoints = []
                  }
                "Language.Haskell.Exts.Annotated"
          , importQualified = True
          , importSrc = False
          , importSafe = False
          , importPkg = Nothing
          , importAs =
              Just
                (ModuleName
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 1 53 1 59
                     , srcInfoPoints = []
                     }
                   "Parser")
          , importSpecs = Nothing
          }
      , ImportDecl
          { importAnn =
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 63
                , srcInfoPoints =
                    [ SrcSpan "tests/examples/HaskellParser.hs" 2 1 2 7
                    , SrcSpan "tests/examples/HaskellParser.hs" 2 8 2 17
                    , SrcSpan "tests/examples/HaskellParser.hs" 2 57 2 59
                    ]
                }
          , importModule =
              ModuleName
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 18 2 56
                  , srcInfoPoints = []
                  }
                "Language.Haskell.Exts.Annotated.Syntax"
          , importQualified = True
          , importSrc = False
          , importSafe = False
          , importPkg = Nothing
          , importAs =
              Just
                (ModuleName
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 2 60 2 63
                     , srcInfoPoints = []
                     }
                   "Syn")
          , importSpecs = Nothing
          }
      , ImportDecl
          { importAnn =
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 56
                , srcInfoPoints =
                    [ SrcSpan "tests/examples/HaskellParser.hs" 3 1 3 7
                    , SrcSpan "tests/examples/HaskellParser.hs" 3 8 3 17
                    , SrcSpan "tests/examples/HaskellParser.hs" 3 50 3 52
                    ]
                }
          , importModule =
              ModuleName
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 18 3 49
                  , srcInfoPoints = []
                  }
                "Language.Haskell.Exts.Extension"
          , importQualified = True
          , importSrc = False
          , importSafe = False
          , importPkg = Nothing
          , importAs =
              Just
                (ModuleName
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 3 53 3 56
                     , srcInfoPoints = []
                     }
                   "Ext")
          , importSpecs = Nothing
          }
      ]
      [ FunBind
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 12 44
            , srcInfoPoints =
                [ SrcSpan "tests/examples/HaskellParser.hs" 6 5 6 10 ]
            }
          [ Match
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 12 44
                , srcInfoPoints =
                    [ SrcSpan "tests/examples/HaskellParser.hs" 6 5 6 10 ]
                }
              (Ident
                 SrcSpanInfo
                   { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 1 5 6
                   , srcInfoPoints = []
                   }
                 "parse")
              [ PVar
                  SrcSpanInfo
                    { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 7 5 23
                    , srcInfoPoints = []
                    }
                  (Ident
                     SrcSpanInfo
                       { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 7 5 23
                       , srcInfoPoints = []
                       }
                     "originalFileName")
              , PVar
                  SrcSpanInfo
                    { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 24 5 29
                    , srcInfoPoints = []
                    }
                  (Ident
                     SrcSpanInfo
                       { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 24 5 29
                       , srcInfoPoints = []
                       }
                     "input")
              ]
              (UnGuardedRhs
                 SrcSpanInfo
                   { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 30 5 74
                   , srcInfoPoints =
                       [ SrcSpan "tests/examples/HaskellParser.hs" 5 30 5 31 ]
                   }
                 (App
                    SrcSpanInfo
                      { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 74
                      , srcInfoPoints = []
                      }
                    (App
                       SrcSpanInfo
                         { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 68
                         , srcInfoPoints = []
                         }
                       (Var
                          SrcSpanInfo
                            { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58
                            , srcInfoPoints = []
                            }
                          (Qual
                             SrcSpanInfo
                               { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58
                               , srcInfoPoints = []
                               }
                             (ModuleName
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58
                                  , srcInfoPoints = []
                                  }
                                "Parser")
                             (Ident
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 5 32 5 58
                                  , srcInfoPoints = []
                                  }
                                "parseModuleWithMode")))
                       (Var
                          SrcSpanInfo
                            { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68
                            , srcInfoPoints = []
                            }
                          (UnQual
                             SrcSpanInfo
                               { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68
                               , srcInfoPoints = []
                               }
                             (Ident
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 5 59 5 68
                                  , srcInfoPoints = []
                                  }
                                "parseMode"))))
                    (Var
                       SrcSpanInfo
                         { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74
                         , srcInfoPoints = []
                         }
                       (UnQual
                          SrcSpanInfo
                            { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74
                            , srcInfoPoints = []
                            }
                          (Ident
                             SrcSpanInfo
                               { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 5 69 5 74
                               , srcInfoPoints = []
                               }
                             "input")))))
              (Just
                 (BDecls
                    SrcSpanInfo
                      { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 12 44
                      , srcInfoPoints =
                          [ SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 7
                          , SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 7
                          , SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 0
                          ]
                      }
                    [ TypeSig
                        SrcSpanInfo
                          { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 36
                          , srcInfoPoints =
                              [ SrcSpan "tests/examples/HaskellParser.hs" 7 17 7 19 ]
                          }
                        [ Ident
                            SrcSpanInfo
                              { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 7 7 16
                              , srcInfoPoints = []
                              }
                            "parseMode"
                        ]
                        (TyCon
                           SrcSpanInfo
                             { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36
                             , srcInfoPoints = []
                             }
                           (Qual
                              SrcSpanInfo
                                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36
                                , srcInfoPoints = []
                                }
                              (ModuleName
                                 SrcSpanInfo
                                   { srcInfoSpan =
                                       SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36
                                   , srcInfoPoints = []
                                   }
                                 "Parser")
                              (Ident
                                 SrcSpanInfo
                                   { srcInfoSpan =
                                       SrcSpan "tests/examples/HaskellParser.hs" 7 20 7 36
                                   , srcInfoPoints = []
                                   }
                                 "ParseMode")))
                    , PatBind
                        SrcSpanInfo
                          { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 12 44
                          , srcInfoPoints = []
                          }
                        (PVar
                           SrcSpanInfo
                             { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 16
                             , srcInfoPoints = []
                             }
                           (Ident
                              SrcSpanInfo
                                { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 8 7 8 16
                                , srcInfoPoints = []
                                }
                              "parseMode"))
                        (UnGuardedRhs
                           SrcSpanInfo
                             { srcInfoSpan =
                                 SrcSpan "tests/examples/HaskellParser.hs" 8 17 12 44
                             , srcInfoPoints =
                                 [ SrcSpan "tests/examples/HaskellParser.hs" 8 17 8 18 ]
                             }
                           (RecUpdate
                              SrcSpanInfo
                                { srcInfoSpan =
                                    SrcSpan "tests/examples/HaskellParser.hs" 8 19 12 44
                                , srcInfoPoints =
                                    [ SrcSpan "tests/examples/HaskellParser.hs" 8 43 8 44
                                    , SrcSpan "tests/examples/HaskellParser.hs" 9 43 9 44
                                    , SrcSpan "tests/examples/HaskellParser.hs" 12 43 12 44
                                    ]
                                }
                              (Var
                                 SrcSpanInfo
                                   { srcInfoSpan =
                                       SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42
                                   , srcInfoPoints = []
                                   }
                                 (Qual
                                    SrcSpanInfo
                                      { srcInfoSpan =
                                          SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42
                                      , srcInfoPoints = []
                                      }
                                    (ModuleName
                                       SrcSpanInfo
                                         { srcInfoSpan =
                                             SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42
                                         , srcInfoPoints = []
                                         }
                                       "Parser")
                                    (Ident
                                       SrcSpanInfo
                                         { srcInfoSpan =
                                             SrcSpan "tests/examples/HaskellParser.hs" 8 19 8 42
                                         , srcInfoPoints = []
                                         }
                                       "defaultParseMode")))
                              [ FieldUpdate
                                  SrcSpanInfo
                                    { srcInfoSpan =
                                        SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 84
                                    , srcInfoPoints =
                                        [ SrcSpan "tests/examples/HaskellParser.hs" 8 66 8 67 ]
                                    }
                                  (Qual
                                     SrcSpanInfo
                                       { srcInfoSpan =
                                           SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65
                                       , srcInfoPoints = []
                                       }
                                     (ModuleName
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65
                                          , srcInfoPoints = []
                                          }
                                        "Parser")
                                     (Ident
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 8 45 8 65
                                          , srcInfoPoints = []
                                          }
                                        "parseFilename"))
                                  (Var
                                     SrcSpanInfo
                                       { srcInfoSpan =
                                           SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84
                                       , srcInfoPoints = []
                                       }
                                     (UnQual
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84
                                          , srcInfoPoints = []
                                          }
                                        (Ident
                                           SrcSpanInfo
                                             { srcInfoSpan =
                                                 SrcSpan "tests/examples/HaskellParser.hs" 8 68 8 84
                                             , srcInfoPoints = []
                                             }
                                           "originalFileName")))
                              , FieldUpdate
                                  SrcSpanInfo
                                    { srcInfoSpan =
                                        SrcSpan "tests/examples/HaskellParser.hs" 9 45 11 67
                                    , srcInfoPoints =
                                        [ SrcSpan "tests/examples/HaskellParser.hs" 9 63 9 64 ]
                                    }
                                  (Qual
                                     SrcSpanInfo
                                       { srcInfoSpan =
                                           SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62
                                       , srcInfoPoints = []
                                       }
                                     (ModuleName
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62
                                          , srcInfoPoints = []
                                          }
                                        "Parser")
                                     (Ident
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 9 45 9 62
                                          , srcInfoPoints = []
                                          }
                                        "extensions"))
                                  (InfixApp
                                     SrcSpanInfo
                                       { srcInfoSpan =
                                           SrcSpan "tests/examples/HaskellParser.hs" 10 47 11 67
                                       , srcInfoPoints = []
                                       }
                                     (Var
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 10 47 10 62
                                          , srcInfoPoints = []
                                          }
                                        (Qual
                                           SrcSpanInfo
                                             { srcInfoSpan =
                                                 SrcSpan
                                                   "tests/examples/HaskellParser.hs" 10 47 10 62
                                             , srcInfoPoints = []
                                             }
                                           (ModuleName
                                              SrcSpanInfo
                                                { srcInfoSpan =
                                                    SrcSpan
                                                      "tests/examples/HaskellParser.hs" 10 47 10 62
                                                , srcInfoPoints = []
                                                }
                                              "Ext")
                                           (Ident
                                              SrcSpanInfo
                                                { srcInfoSpan =
                                                    SrcSpan
                                                      "tests/examples/HaskellParser.hs" 10 47 10 62
                                                , srcInfoPoints = []
                                                }
                                              "glasgowExts")))
                                     (QVarOp
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 10 63 10 65
                                          , srcInfoPoints = []
                                          }
                                        (UnQual
                                           SrcSpanInfo
                                             { srcInfoSpan =
                                                 SrcSpan
                                                   "tests/examples/HaskellParser.hs" 10 63 10 65
                                             , srcInfoPoints = []
                                             }
                                           (Symbol
                                              SrcSpanInfo
                                                { srcInfoSpan =
                                                    SrcSpan
                                                      "tests/examples/HaskellParser.hs" 10 63 10 65
                                                , srcInfoPoints = []
                                                }
                                              "++")))
                                     (List
                                        SrcSpanInfo
                                          { srcInfoSpan =
                                              SrcSpan "tests/examples/HaskellParser.hs" 11 47 11 67
                                          , srcInfoPoints =
                                              [ SrcSpan
                                                  "tests/examples/HaskellParser.hs" 11 47 11 48
                                              , SrcSpan
                                                  "tests/examples/HaskellParser.hs" 11 66 11 67
                                              ]
                                          }
                                        [ Con
                                            SrcSpanInfo
                                              { srcInfoSpan =
                                                  SrcSpan
                                                    "tests/examples/HaskellParser.hs" 11 48 11 66
                                              , srcInfoPoints = []
                                              }
                                            (Qual
                                               SrcSpanInfo
                                                 { srcInfoSpan =
                                                     SrcSpan
                                                       "tests/examples/HaskellParser.hs" 11 48 11 66
                                                 , srcInfoPoints = []
                                                 }
                                               (ModuleName
                                                  SrcSpanInfo
                                                    { srcInfoSpan =
                                                        SrcSpan
                                                          "tests/examples/HaskellParser.hs"
                                                          11
                                                          48
                                                          11
                                                          66
                                                    , srcInfoPoints = []
                                                    }
                                                  "Ext")
                                               (Ident
                                                  SrcSpanInfo
                                                    { srcInfoSpan =
                                                        SrcSpan
                                                          "tests/examples/HaskellParser.hs"
                                                          11
                                                          48
                                                          11
                                                          66
                                                    , srcInfoPoints = []
                                                    }
                                                  "ExplicitForall"))
                                        ]))
                              ]))
                        Nothing
                    ]))
          ]
      , PatBind
          SrcSpanInfo
            { srcInfoSpan =
                SrcSpan "tests/examples/HaskellParser.hs" 13 1 16 25
            , srcInfoPoints = []
            }
          (PVar
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 5
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 13 1 13 5
                  , srcInfoPoints = []
                  }
                "main"))
          (UnGuardedRhs
             SrcSpanInfo
               { srcInfoSpan =
                   SrcSpan "tests/examples/HaskellParser.hs" 13 6 16 25
               , srcInfoPoints =
                   [ SrcSpan "tests/examples/HaskellParser.hs" 13 6 13 7 ]
               }
             (Do
                SrcSpanInfo
                  { srcInfoSpan =
                      SrcSpan "tests/examples/HaskellParser.hs" 14 5 16 25
                  , srcInfoPoints =
                      [ SrcSpan "tests/examples/HaskellParser.hs" 14 5 14 7
                      , SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 8
                      , SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 8
                      , SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 8
                      , SrcSpan "tests/examples/HaskellParser.hs" 17 1 17 0
                      ]
                  }
                [ Generator
                    SrcSpanInfo
                      { srcInfoSpan =
                          SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 30
                      , srcInfoPoints =
                          [ SrcSpan "tests/examples/HaskellParser.hs" 14 10 14 12 ]
                      }
                    (PVar
                       SrcSpanInfo
                         { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 9
                         , srcInfoPoints = []
                         }
                       (Ident
                          SrcSpanInfo
                            { srcInfoSpan = SrcSpan "tests/examples/HaskellParser.hs" 14 8 14 9
                            , srcInfoPoints = []
                            }
                          "s"))
                    (App
                       SrcSpanInfo
                         { srcInfoSpan =
                             SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 30
                         , srcInfoPoints = []
                         }
                       (Var
                          SrcSpanInfo
                            { srcInfoSpan =
                                SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21
                            , srcInfoPoints = []
                            }
                          (UnQual
                             SrcSpanInfo
                               { srcInfoSpan =
                                   SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21
                               , srcInfoPoints = []
                               }
                             (Ident
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 14 13 14 21
                                  , srcInfoPoints = []
                                  }
                                "readFile")))
                       (Lit
                          SrcSpanInfo
                            { srcInfoSpan =
                                SrcSpan "tests/examples/HaskellParser.hs" 14 22 14 30
                            , srcInfoPoints = []
                            }
                          (String
                             SrcSpanInfo
                               { srcInfoSpan =
                                   SrcSpan "tests/examples/HaskellParser.hs" 14 22 14 30
                               , srcInfoPoints = []
                               }
                             "Bug.hs"
                             "Bug.hs")))
                , LetStmt
                    SrcSpanInfo
                      { srcInfoSpan =
                          SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 32
                      , srcInfoPoints =
                          [ SrcSpan "tests/examples/HaskellParser.hs" 15 8 15 11 ]
                      }
                    (BDecls
                       SrcSpanInfo
                         { srcInfoSpan =
                             SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 32
                         , srcInfoPoints =
                             [ SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 12
                             , SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 0
                             ]
                         }
                       [ PatBind
                           SrcSpanInfo
                             { srcInfoSpan =
                                 SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 32
                             , srcInfoPoints = []
                             }
                           (PVar
                              SrcSpanInfo
                                { srcInfoSpan =
                                    SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 13
                                , srcInfoPoints = []
                                }
                              (Ident
                                 SrcSpanInfo
                                   { srcInfoSpan =
                                       SrcSpan "tests/examples/HaskellParser.hs" 15 12 15 13
                                   , srcInfoPoints = []
                                   }
                                 "x"))
                           (UnGuardedRhs
                              SrcSpanInfo
                                { srcInfoSpan =
                                    SrcSpan "tests/examples/HaskellParser.hs" 15 14 15 32
                                , srcInfoPoints =
                                    [ SrcSpan "tests/examples/HaskellParser.hs" 15 14 15 15 ]
                                }
                              (App
                                 SrcSpanInfo
                                   { srcInfoSpan =
                                       SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 32
                                   , srcInfoPoints = []
                                   }
                                 (App
                                    SrcSpanInfo
                                      { srcInfoSpan =
                                          SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 30
                                      , srcInfoPoints = []
                                      }
                                    (Var
                                       SrcSpanInfo
                                         { srcInfoSpan =
                                             SrcSpan "tests/examples/HaskellParser.hs" 15 16 15 21
                                         , srcInfoPoints = []
                                         }
                                       (UnQual
                                          SrcSpanInfo
                                            { srcInfoSpan =
                                                SrcSpan
                                                  "tests/examples/HaskellParser.hs" 15 16 15 21
                                            , srcInfoPoints = []
                                            }
                                          (Ident
                                             SrcSpanInfo
                                               { srcInfoSpan =
                                                   SrcSpan
                                                     "tests/examples/HaskellParser.hs" 15 16 15 21
                                               , srcInfoPoints = []
                                               }
                                             "parse")))
                                    (Lit
                                       SrcSpanInfo
                                         { srcInfoSpan =
                                             SrcSpan "tests/examples/HaskellParser.hs" 15 22 15 30
                                         , srcInfoPoints = []
                                         }
                                       (String
                                          SrcSpanInfo
                                            { srcInfoSpan =
                                                SrcSpan
                                                  "tests/examples/HaskellParser.hs" 15 22 15 30
                                            , srcInfoPoints = []
                                            }
                                          "Bug.hs"
                                          "Bug.hs")))
                                 (Var
                                    SrcSpanInfo
                                      { srcInfoSpan =
                                          SrcSpan "tests/examples/HaskellParser.hs" 15 31 15 32
                                      , srcInfoPoints = []
                                      }
                                    (UnQual
                                       SrcSpanInfo
                                         { srcInfoSpan =
                                             SrcSpan "tests/examples/HaskellParser.hs" 15 31 15 32
                                         , srcInfoPoints = []
                                         }
                                       (Ident
                                          SrcSpanInfo
                                            { srcInfoSpan =
                                                SrcSpan
                                                  "tests/examples/HaskellParser.hs" 15 31 15 32
                                            , srcInfoPoints = []
                                            }
                                          "s")))))
                           Nothing
                       ])
                , Qualifier
                    SrcSpanInfo
                      { srcInfoSpan =
                          SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 25
                      , srcInfoPoints = []
                      }
                    (App
                       SrcSpanInfo
                         { srcInfoSpan =
                             SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 25
                         , srcInfoPoints = []
                         }
                       (Var
                          SrcSpanInfo
                            { srcInfoSpan =
                                SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16
                            , srcInfoPoints = []
                            }
                          (UnQual
                             SrcSpanInfo
                               { srcInfoSpan =
                                   SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16
                               , srcInfoPoints = []
                               }
                             (Ident
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 16 8 16 16
                                  , srcInfoPoints = []
                                  }
                                "putStrLn")))
                       (Paren
                          SrcSpanInfo
                            { srcInfoSpan =
                                SrcSpan "tests/examples/HaskellParser.hs" 16 17 16 25
                            , srcInfoPoints =
                                [ SrcSpan "tests/examples/HaskellParser.hs" 16 17 16 18
                                , SrcSpan "tests/examples/HaskellParser.hs" 16 24 16 25
                                ]
                            }
                          (App
                             SrcSpanInfo
                               { srcInfoSpan =
                                   SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 24
                               , srcInfoPoints = []
                               }
                             (Var
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22
                                  , srcInfoPoints = []
                                  }
                                (UnQual
                                   SrcSpanInfo
                                     { srcInfoSpan =
                                         SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22
                                     , srcInfoPoints = []
                                     }
                                   (Ident
                                      SrcSpanInfo
                                        { srcInfoSpan =
                                            SrcSpan "tests/examples/HaskellParser.hs" 16 18 16 22
                                        , srcInfoPoints = []
                                        }
                                      "show")))
                             (Var
                                SrcSpanInfo
                                  { srcInfoSpan =
                                      SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24
                                  , srcInfoPoints = []
                                  }
                                (UnQual
                                   SrcSpanInfo
                                     { srcInfoSpan =
                                         SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24
                                     , srcInfoPoints = []
                                     }
                                   (Ident
                                      SrcSpanInfo
                                        { srcInfoSpan =
                                            SrcSpan "tests/examples/HaskellParser.hs" 16 23 16 24
                                        , srcInfoPoints = []
                                        }
                                      "x"))))))
                ]))
          Nothing
      ]
  , []
  )