File: Nounpack2.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 (96 lines) | stat: -rw-r--r-- 3,647 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
ParseOk
  ( Module
      SrcSpanInfo
        { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 4 1
        , srcInfoPoints =
            [ SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1
            , SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1
            , SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 1
            , SrcSpan "tests/examples/Nounpack2.hs" 4 1 4 1
            , SrcSpan "tests/examples/Nounpack2.hs" 4 1 4 1
            ]
        }
      Nothing
      []
      []
      [ DataDecl
          SrcSpanInfo
            { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 36
            , srcInfoPoints =
                [ SrcSpan "tests/examples/Nounpack2.hs" 3 10 3 11 ]
            }
          (DataType
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 1 3 5
               , srcInfoPoints = []
               })
          Nothing
          (DHead
             SrcSpanInfo
               { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 6 3 9
               , srcInfoPoints = []
               }
             (Ident
                SrcSpanInfo
                  { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 6 3 9
                  , srcInfoPoints = []
                  }
                "Foo"))
          [ QualConDecl
              SrcSpanInfo
                { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 36
                , srcInfoPoints = []
                }
              Nothing
              Nothing
              (ConDecl
                 SrcSpanInfo
                   { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 36
                   , srcInfoPoints = []
                   }
                 (Ident
                    SrcSpanInfo
                      { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 12 3 15
                      , srcInfoPoints = []
                      }
                    "Foo")
                 [ TyBang
                     SrcSpanInfo
                       { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 36
                       , srcInfoPoints = []
                       }
                     (NoStrictAnnot
                        SrcSpanInfo
                          { srcInfoSpan = SrcSpan "" (-1) (-1) (-1) (-1)
                          , srcInfoPoints = []
                          })
                     (NoUnpack
                        SrcSpanInfo
                          { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 32
                          , srcInfoPoints =
                              [ SrcSpan "tests/examples/Nounpack2.hs" 3 16 3 28
                              , SrcSpan "tests/examples/Nounpack2.hs" 3 29 3 32
                              ]
                          })
                     (TyCon
                        SrcSpanInfo
                          { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36
                          , srcInfoPoints = []
                          }
                        (UnQual
                           SrcSpanInfo
                             { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36
                             , srcInfoPoints = []
                             }
                           (Ident
                              SrcSpanInfo
                                { srcInfoSpan = SrcSpan "tests/examples/Nounpack2.hs" 3 33 3 36
                                , srcInfoPoints = []
                                }
                              "Int")))
                 ])
          ]
          []
      ]
  , []
  )