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

ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan =
            SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 4 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 1
            , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1
            , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1
            , SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 1
            , SrcSpan "tests/examples/FFIInterruptible.hs" 4 1 4 1
            , SrcSpan "tests/examples/FFIInterruptible.hs" 4 1 4 1
            ]
        }
      Nothing
      [ LanguagePragma
          SrcSpanInfo
            { srcInfoSpan =
                SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 34
            , srcInfoPoints =
                [ SrcSpan "tests/examples/FFIInterruptible.hs" 1 1 1 13
                , SrcSpan "tests/examples/FFIInterruptible.hs" 1 31 1 34
                ]
            }
          [ Ident
              SrcSpanInfo
                { srcInfoSpan =
                    SrcSpan "tests/examples/FFIInterruptible.hs" 1 14 1 30
                , srcInfoPoints = []
                }
              "InterruptibleFFI"
          ]
      ]
      []
      [ PatBind
          SrcSpanInfo
            { srcInfoSpan =
                SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 20
            , srcInfoPoints = []
            }
          (PVar
             SrcSpanInfo
               { srcInfoSpan =
                   SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 4
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan =
                      SrcSpan "tests/examples/FFIInterruptible.hs" 2 1 2 4
                  , srcInfoPoints = []
                  }
                "foo"))
          (UnGuardedRhs
             SrcSpanInfo
               { srcInfoSpan =
                   SrcSpan "tests/examples/FFIInterruptible.hs" 2 5 2 20
               , srcInfoPoints =
                   [ SrcSpan "tests/examples/FFIInterruptible.hs" 2 5 2 6 ]
               }
             (Var
                SrcSpanInfo
                  { srcInfoSpan =
                      SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20
                  , srcInfoPoints = []
                  }
                (UnQual
                   SrcSpanInfo
                     { srcInfoSpan =
                         SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20
                     , srcInfoPoints = []
                     }
                   (Ident
                      SrcSpanInfo
                        { srcInfoSpan =
                            SrcSpan "tests/examples/FFIInterruptible.hs" 2 7 2 20
                        , srcInfoPoints = []
                        }
                      "interruptible"))))
          Nothing
      ]
  , []
  )