1ParseOk
2  ( Module
3      SrcSpanInfo
4        { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 13 1
5        , srcInfoPoints =
6            [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 1
7            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1
8            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1
9            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 1
10            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 1
11            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 1
12            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 1
13            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 1
14            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 1
15            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 1
16            ]
17        }
18      Nothing
19      [ LanguagePragma
20          SrcSpanInfo
21            { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 29
22            , srcInfoPoints =
23                [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 1 1 13
24                , SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 26 1 29
25                ]
26            }
27          [ Ident
28              SrcSpanInfo
29                { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 1 14 1 25
30                , srcInfoPoints = []
31                }
32              "QuasiQuotes"
33          ]
34      ]
35      [ ImportDecl
36          { importAnn =
37              SrcSpanInfo
38                { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 12
39                , srcInfoPoints =
40                    [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 1 3 7 ]
41                }
42          , importModule =
43              ModuleName
44                SrcSpanInfo
45                  { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 3 8 3 12
46                  , srcInfoPoints = []
47                  }
48                "Here"
49          , importQualified = False
50          , importSrc = False
51          , importSafe = False
52          , importPkg = Nothing
53          , importAs = Nothing
54          , importSpecs = Nothing
55          }
56      ]
57      [ TypeSig
58          SrcSpanInfo
59            { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 14
60            , srcInfoPoints =
61                [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 5 5 7 ]
62            }
63          [ Ident
64              SrcSpanInfo
65                { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 1 5 4
66                , srcInfoPoints = []
67                }
68              "str"
69          ]
70          (TyCon
71             SrcSpanInfo
72               { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14
73               , srcInfoPoints = []
74               }
75             (UnQual
76                SrcSpanInfo
77                  { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14
78                  , srcInfoPoints = []
79                  }
80                (Ident
81                   SrcSpanInfo
82                     { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 5 8 5 14
83                     , srcInfoPoints = []
84                     }
85                   "String")))
86      , PatBind
87          SrcSpanInfo
88            { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 8 13
89            , srcInfoPoints = []
90            }
91          (PVar
92             SrcSpanInfo
93               { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 4
94               , srcInfoPoints = []
95               }
96             (Ident
97                SrcSpanInfo
98                  { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 1 6 4
99                  , srcInfoPoints = []
100                  }
101                "str"))
102          (UnGuardedRhs
103             SrcSpanInfo
104               { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 5 8 13
105               , srcInfoPoints =
106                   [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 5 6 6 ]
107               }
108             (QuasiQuote
109                SrcSpanInfo
110                  { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 6 7 8 13
111                  , srcInfoPoints = []
112                  }
113                "here"
114                "test \ntest \ntest test "))
115          Nothing
116      , TypeSig
117          SrcSpanInfo
118            { srcInfoSpan =
119                SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 13
120            , srcInfoPoints =
121                [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 6 11 8 ]
122            }
123          [ Ident
124              SrcSpanInfo
125                { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 1 11 5
126                , srcInfoPoints = []
127                }
128              "main"
129          ]
130          (TyApp
131             SrcSpanInfo
132               { srcInfoSpan =
133                   SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 13
134               , srcInfoPoints = []
135               }
136             (TyCon
137                SrcSpanInfo
138                  { srcInfoSpan =
139                      SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11
140                  , srcInfoPoints = []
141                  }
142                (UnQual
143                   SrcSpanInfo
144                     { srcInfoSpan =
145                         SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11
146                     , srcInfoPoints = []
147                     }
148                   (Ident
149                      SrcSpanInfo
150                        { srcInfoSpan =
151                            SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 9 11 11
152                        , srcInfoPoints = []
153                        }
154                      "IO")))
155             (TyCon
156                SrcSpanInfo
157                  { srcInfoSpan =
158                      SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13
159                  , srcInfoPoints =
160                      [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12
161                      , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13
162                      ]
163                  }
164                (Special
165                   SrcSpanInfo
166                     { srcInfoSpan =
167                         SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13
168                     , srcInfoPoints =
169                         [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12
170                         , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13
171                         ]
172                     }
173                   (UnitCon
174                      SrcSpanInfo
175                        { srcInfoSpan =
176                            SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 13
177                        , srcInfoPoints =
178                            [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 11 11 12
179                            , SrcSpan "tests/examples/QuasiQuoteOld.hs" 11 12 11 13
180                            ]
181                        }))))
182      , PatBind
183          SrcSpanInfo
184            { srcInfoSpan =
185                SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 23
186            , srcInfoPoints = []
187            }
188          (PVar
189             SrcSpanInfo
190               { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 5
191               , srcInfoPoints = []
192               }
193             (Ident
194                SrcSpanInfo
195                  { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 1 12 5
196                  , srcInfoPoints = []
197                  }
198                "main"))
199          (UnGuardedRhs
200             SrcSpanInfo
201               { srcInfoSpan =
202                   SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 6 12 23
203               , srcInfoPoints =
204                   [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 6 12 7 ]
205               }
206             (Do
207                SrcSpanInfo
208                  { srcInfoSpan =
209                      SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 8 12 23
210                  , srcInfoPoints =
211                      [ SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 8 12 10
212                      , SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 11
213                      , SrcSpan "tests/examples/QuasiQuoteOld.hs" 13 1 13 0
214                      ]
215                  }
216                [ Qualifier
217                    SrcSpanInfo
218                      { srcInfoSpan =
219                          SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 23
220                      , srcInfoPoints = []
221                      }
222                    (App
223                       SrcSpanInfo
224                         { srcInfoSpan =
225                             SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 23
226                         , srcInfoPoints = []
227                         }
228                       (Var
229                          SrcSpanInfo
230                            { srcInfoSpan =
231                                SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19
232                            , srcInfoPoints = []
233                            }
234                          (UnQual
235                             SrcSpanInfo
236                               { srcInfoSpan =
237                                   SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19
238                               , srcInfoPoints = []
239                               }
240                             (Ident
241                                SrcSpanInfo
242                                  { srcInfoSpan =
243                                      SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 11 12 19
244                                  , srcInfoPoints = []
245                                  }
246                                "putStrLn")))
247                       (Var
248                          SrcSpanInfo
249                            { srcInfoSpan =
250                                SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23
251                            , srcInfoPoints = []
252                            }
253                          (UnQual
254                             SrcSpanInfo
255                               { srcInfoSpan =
256                                   SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23
257                               , srcInfoPoints = []
258                               }
259                             (Ident
260                                SrcSpanInfo
261                                  { srcInfoSpan =
262                                      SrcSpan "tests/examples/QuasiQuoteOld.hs" 12 20 12 23
263                                  , srcInfoPoints = []
264                                  }
265                                "str"))))
266                ]))
267          Nothing
268      ]
269  , []
270  )
271