packages feed

haskell-src-exts-1.17.0: tests/examples/HashBang.hs.parser.golden

ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 1 6 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/HashBang.hs" 3 1 3 1
            , SrcSpan "tests/examples/HashBang.hs" 3 1 3 1
            , SrcSpan "tests/examples/HashBang.hs" 3 1 3 1
            , SrcSpan "tests/examples/HashBang.hs" 4 1 4 1
            , SrcSpan "tests/examples/HashBang.hs" 6 1 6 1
            , SrcSpan "tests/examples/HashBang.hs" 6 1 6 1
            ]
        }
      Nothing
      []
      []
      [ TypeSig
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 1 3 14
            , srcInfoPoints = [ SrcSpan "tests/examples/HashBang.hs" 3 6 3 8 ]
            }
          [ Ident
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 1 3 5
                , srcInfoPoints = []
                }
              "main"
          ]
          (TyApp
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 9 3 14
               , srcInfoPoints = []
               }
             (TyCon
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 9 3 11
                  , srcInfoPoints = []
                  }
                (UnQual
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 9 3 11
                     , srcInfoPoints = []
                     }
                   (Ident
                      SrcSpanInfo
                        { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 9 3 11
                        , srcInfoPoints = []
                        }
                      "IO")))
             (TyCon
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 12 3 14
                  , srcInfoPoints =
                      [ SrcSpan "tests/examples/HashBang.hs" 3 12 3 13
                      , SrcSpan "tests/examples/HashBang.hs" 3 13 3 14
                      ]
                  }
                (Special
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 12 3 14
                     , srcInfoPoints =
                         [ SrcSpan "tests/examples/HashBang.hs" 3 12 3 13
                         , SrcSpan "tests/examples/HashBang.hs" 3 13 3 14
                         ]
                     }
                   (UnitCon
                      SrcSpanInfo
                        { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 3 12 3 14
                        , srcInfoPoints =
                            [ SrcSpan "tests/examples/HashBang.hs" 3 12 3 13
                            , SrcSpan "tests/examples/HashBang.hs" 3 13 3 14
                            ]
                        }))))
      , PatBind
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 1 4 17
            , srcInfoPoints = []
            }
          (PVar
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 1 4 5
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 1 4 5
                  , srcInfoPoints = []
                  }
                "main"))
          (UnGuardedRhs
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 6 4 17
               , srcInfoPoints = [ SrcSpan "tests/examples/HashBang.hs" 4 6 4 7 ]
               }
             (Var
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 8 4 17
                  , srcInfoPoints = []
                  }
                (UnQual
                   SrcSpanInfo
                     { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 8 4 17
                     , srcInfoPoints = []
                     }
                   (Ident
                      SrcSpanInfo
                        { srcInfoSpan = SrcSpan "tests/examples/HashBang.hs" 4 8 4 17
                        , srcInfoPoints = []
                        }
                      "undefined"))))
          Nothing
      ]
  , [ Comment
        False
        (SrcSpan "tests/examples/HashBang.hs" 2 1 2 15)
        " Hello world"
    , Comment
        False
        (SrcSpan "tests/examples/HashBang.hs" 5 1 5 32)
        " Post-apocalyptic hello world"
    ]
  )