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