DumpParsedAst.stderr 7.24 KB
Newer Older
1
2
3
4

==================== Parser AST ====================

({ DumpParsedAst.hs:1:1 }
5
6
7
8
9
10
11
12
13
 (HsModule
  (Just
   ({ DumpParsedAst.hs:3:8-20 }
    {ModuleName: DumpParsedAst}))
  (Nothing)
  []
  [({ DumpParsedAst.hs:5:1-30 }
    (TyClD
     (DataDecl
14
      ({ DumpParsedAst.hs:5:6-10 }
15
16
17
18
19
20
21
22
23
       (Unqual
        {OccName: Peano}))
      (HsQTvs
       (PlaceHolder)
       []
       (PlaceHolder))
      (Prefix)
      (HsDataDefn
       (DataType)
24
       ({ <no location info> }
25
26
27
28
29
        [])
       (Nothing)
       (Nothing)
       [({ DumpParsedAst.hs:5:14-17 }
         (ConDeclH98
30
          ({ DumpParsedAst.hs:5:14-17 }
31
32
33
34
           (Unqual
            {OccName: Zero}))
          (Nothing)
          (Just
35
           ({ <no location info> }
36
37
38
39
40
41
            []))
          (PrefixCon
           [])
          (Nothing)))
       ,({ DumpParsedAst.hs:5:21-30 }
         (ConDeclH98
42
          ({ DumpParsedAst.hs:5:21-24 }
43
44
45
46
           (Unqual
            {OccName: Succ}))
          (Nothing)
          (Just
47
           ({ <no location info> }
48
49
50
51
52
            []))
          (PrefixCon
           [({ DumpParsedAst.hs:5:26-30 }
             (HsTyVar
              (NotPromoted)
53
              ({ DumpParsedAst.hs:5:26-30 }
54
55
56
               (Unqual
                {OccName: Peano}))))])
          (Nothing)))]
57
       ({ <no location info> }
58
59
60
61
62
63
64
65
66
67
        []))
      (PlaceHolder)
      (PlaceHolder))))
  ,({ DumpParsedAst.hs:7:1-39 }
    (TyClD
     (FamDecl
      (FamilyDecl
       (ClosedTypeFamily
        (Just
         [({ DumpParsedAst.hs:8:3-36 }
68
69
70
71
72
73
           (HsIB
            (PlaceHolder)
            (FamEqn
             ({ DumpParsedAst.hs:8:3-8 }
              (Unqual
               {OccName: Length}))
74
75
             [({ DumpParsedAst.hs:8:10-17 }
               (HsParTy
76
                ({ DumpParsedAst.hs:8:11-16 }
77
78
79
                 (HsAppsTy
                  [({ DumpParsedAst.hs:8:11 }
                    (HsAppPrefix
80
                     ({ DumpParsedAst.hs:8:11 }
81
82
                      (HsTyVar
                       (NotPromoted)
83
                       ({ DumpParsedAst.hs:8:11 }
84
85
86
87
                        (Unqual
                         {OccName: a}))))))
                  ,({ DumpParsedAst.hs:8:13 }
                    (HsAppInfix
88
                     ({ DumpParsedAst.hs:8:13 }
89
90
91
92
                      (Exact
                       {Name: :}))))
                  ,({ DumpParsedAst.hs:8:15-16 }
                    (HsAppPrefix
93
                     ({ DumpParsedAst.hs:8:15-16 }
94
95
                      (HsTyVar
                       (NotPromoted)
96
                       ({ DumpParsedAst.hs:8:15-16 }
97
98
                        (Unqual
                         {OccName: as}))))))]))))]
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
             (Prefix)
             ({ DumpParsedAst.hs:8:21-36 }
              (HsAppsTy
               [({ DumpParsedAst.hs:8:21-24 }
                 (HsAppPrefix
                  ({ DumpParsedAst.hs:8:21-24 }
                   (HsTyVar
                    (NotPromoted)
                    ({ DumpParsedAst.hs:8:21-24 }
                     (Unqual
                      {OccName: Succ}))))))
               ,({ DumpParsedAst.hs:8:26-36 }
                 (HsAppPrefix
                  ({ DumpParsedAst.hs:8:26-36 }
                   (HsParTy
                    ({ DumpParsedAst.hs:8:27-35 }
                     (HsAppsTy
                      [({ DumpParsedAst.hs:8:27-32 }
                        (HsAppPrefix
                         ({ DumpParsedAst.hs:8:27-32 }
                          (HsTyVar
                           (NotPromoted)
                           ({ DumpParsedAst.hs:8:27-32 }
                            (Unqual
                             {OccName: Length}))))))
                      ,({ DumpParsedAst.hs:8:34-35 }
                        (HsAppPrefix
                         ({ DumpParsedAst.hs:8:34-35 }
                          (HsTyVar
                           (NotPromoted)
                           ({ DumpParsedAst.hs:8:34-35 }
                            (Unqual
                             {OccName: as}))))))]))))))])))
            (PlaceHolder)))
133
         ,({ DumpParsedAst.hs:9:3-24 }
134
135
136
137
138
139
           (HsIB
            (PlaceHolder)
            (FamEqn
             ({ DumpParsedAst.hs:9:3-8 }
              (Unqual
               {OccName: Length}))
140
141
142
143
144
             [({ DumpParsedAst.hs:9:10-12 }
               (HsExplicitListTy
                (Promoted)
                (PlaceHolder)
                []))]
145
146
147
148
149
150
151
152
153
154
155
156
             (Prefix)
             ({ DumpParsedAst.hs:9:21-24 }
              (HsAppsTy
               [({ DumpParsedAst.hs:9:21-24 }
                 (HsAppPrefix
                  ({ DumpParsedAst.hs:9:21-24 }
                   (HsTyVar
                    (NotPromoted)
                    ({ DumpParsedAst.hs:9:21-24 }
                     (Unqual
                      {OccName: Zero}))))))])))
            (PlaceHolder)))]))
157
       ({ DumpParsedAst.hs:7:13-18 }
158
159
160
161
162
163
        (Unqual
         {OccName: Length}))
       (HsQTvs
        (PlaceHolder)
        [({ DumpParsedAst.hs:7:20-30 }
          (KindedTyVar
164
           ({ DumpParsedAst.hs:7:21-22 }
165
166
            (Unqual
             {OccName: as}))
167
           ({ DumpParsedAst.hs:7:27-29 }
168
169
170
            (HsAppsTy
             [({ DumpParsedAst.hs:7:27-29 }
               (HsAppPrefix
171
                ({ DumpParsedAst.hs:7:27-29 }
172
                 (HsListTy
173
                  ({ DumpParsedAst.hs:7:28 }
174
175
176
                   (HsAppsTy
                    [({ DumpParsedAst.hs:7:28 }
                      (HsAppPrefix
177
                       ({ DumpParsedAst.hs:7:28 }
178
179
                        (HsTyVar
                         (NotPromoted)
180
                         ({ DumpParsedAst.hs:7:28 }
181
182
183
184
                          (Unqual
                           {OccName: k}))))))]))))))]))))]
        (PlaceHolder))
       (Prefix)
185
       ({ DumpParsedAst.hs:7:32-39 }
186
        (KindSig
187
         ({ DumpParsedAst.hs:7:35-39 }
188
189
190
          (HsAppsTy
           [({ DumpParsedAst.hs:7:35-39 }
             (HsAppPrefix
191
              ({ DumpParsedAst.hs:7:35-39 }
192
193
               (HsTyVar
                (NotPromoted)
194
                ({ DumpParsedAst.hs:7:35-39 }
195
196
197
198
199
200
                 (Unqual
                  {OccName: Peano}))))))]))))
       (Nothing)))))
  ,({ DumpParsedAst.hs:11:1-23 }
    (ValD
     (FunBind
201
      ({ DumpParsedAst.hs:11:1-4 }
202
203
204
       (Unqual
        {OccName: main}))
      (MG
205
       ({ DumpParsedAst.hs:11:1-23 }
206
207
208
        [({ DumpParsedAst.hs:11:1-23 }
          (Match
           (FunRhs
209
            ({ DumpParsedAst.hs:11:1-4 }
210
211
212
213
214
215
216
217
218
             (Unqual
              {OccName: main}))
            (Prefix)
            (NoSrcStrict))
           []
           (GRHSs
            [({ DumpParsedAst.hs:11:6-23 }
              (GRHS
               []
219
               ({ DumpParsedAst.hs:11:8-23 }
220
                (HsApp
221
                 ({ DumpParsedAst.hs:11:8-15 }
222
                  (HsVar
223
                   ({ DumpParsedAst.hs:11:8-15 }
224
225
                    (Unqual
                     {OccName: putStrLn}))))
226
                 ({ DumpParsedAst.hs:11:17-23 }
227
228
229
230
231
                  (HsLit
                   (HsString
                    (SourceText
                     "\"hello\"")
                    {FastString: "hello"})))))))]
232
            ({ <no location info> }
233
234
235
236
237
238
239
240
             (EmptyLocalBinds)))))])
       []
       (PlaceHolder)
       (FromSource))
      (WpHole)
      (PlaceHolder)
      [])))]
  (Nothing)
241
  (Nothing)))
242
243