File: SimpleDeriving.hs.parser.golden

package info (click to toggle)
haskell-src-exts 1.23.1-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 25,852 kB
  • sloc: haskell: 13,707; makefile: 12
file content (101 lines) | stat: -rw-r--r-- 3,577 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 2 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1
            , SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1
            , SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 1
            , SrcSpan "tests/examples/SimpleDeriving.hs" 2 1 2 1
            , SrcSpan "tests/examples/SimpleDeriving.hs" 2 1 2 1
            ]
        }
      Nothing
      []
      []
      [ DataDecl
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 23
            , srcInfoPoints =
                [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 8 1 9 ]
            }
          (DataType
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 1 1 5
               , srcInfoPoints = []
               })
          Nothing
          (DHead
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 6 1 7
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/SimpleDeriving.hs" 1 6 1 7
                  , srcInfoPoints = []
                  }
                "T"))
          [ QualConDecl
              SrcSpanInfo
                { srcInfoSpan =
                    SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11
                , srcInfoPoints = []
                }
              Nothing
              Nothing
              (ConDecl
                 SrcSpanInfo
                   { srcInfoSpan =
                       SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11
                   , srcInfoPoints = []
                   }
                 (Ident
                    SrcSpanInfo
                      { srcInfoSpan =
                          SrcSpan "tests/examples/SimpleDeriving.hs" 1 10 1 11
                      , srcInfoPoints = []
                      }
                    "T")
                 [])
          ]
          [ Deriving
              SrcSpanInfo
                { srcInfoSpan =
                    SrcSpan "tests/examples/SimpleDeriving.hs" 1 12 1 23
                , srcInfoPoints =
                    [ SrcSpan "tests/examples/SimpleDeriving.hs" 1 12 1 20 ]
                }
              Nothing
              [ IRule
                  SrcSpanInfo
                    { srcInfoSpan =
                        SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23
                    , srcInfoPoints = []
                    }
                  Nothing
                  Nothing
                  (IHCon
                     SrcSpanInfo
                       { srcInfoSpan =
                           SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23
                       , srcInfoPoints = []
                       }
                     (UnQual
                        SrcSpanInfo
                          { srcInfoSpan =
                              SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23
                          , srcInfoPoints = []
                          }
                        (Ident
                           SrcSpanInfo
                             { srcInfoSpan =
                                 SrcSpan "tests/examples/SimpleDeriving.hs" 1 21 1 23
                             , srcInfoPoints = []
                             }
                           "Eq")))
              ]
          ]
      ]
  , []
  )