1ParseOk
2  ( Module
3      SrcSpanInfo
4        { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 1 4 1
5        , srcInfoPoints =
6            [ SrcSpan "tests/examples/InfixBang.hs" 1 1 1 1
7            , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1
8            , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1
9            , SrcSpan "tests/examples/InfixBang.hs" 3 1 3 1
10            , SrcSpan "tests/examples/InfixBang.hs" 4 1 4 1
11            , SrcSpan "tests/examples/InfixBang.hs" 4 1 4 1
12            ]
13        }
14      Nothing
15      [ LanguagePragma
16          SrcSpanInfo
17            { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 1 1 30
18            , srcInfoPoints =
19                [ SrcSpan "tests/examples/InfixBang.hs" 1 1 1 13
20                , SrcSpan "tests/examples/InfixBang.hs" 1 27 1 30
21                ]
22            }
23          [ Ident
24              SrcSpanInfo
25                { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 1 14 1 26
26                , srcInfoPoints = []
27                }
28              "BangPatterns"
29          ]
30      ]
31      []
32      [ FunBind
33          SrcSpanInfo
34            { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 1 3 18
35            , srcInfoPoints = []
36            }
37          [ Match
38              SrcSpanInfo
39                { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 1 3 18
40                , srcInfoPoints =
41                    [ SrcSpan "tests/examples/InfixBang.hs" 3 1 3 2
42                    , SrcSpan "tests/examples/InfixBang.hs" 3 2 3 3
43                    , SrcSpan "tests/examples/InfixBang.hs" 3 3 3 4
44                    ]
45                }
46              (Symbol
47                 SrcSpanInfo
48                   { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 2 3 3
49                   , srcInfoPoints = []
50                   }
51                 "!")
52              [ PVar
53                  SrcSpanInfo
54                    { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 5 3 8
55                    , srcInfoPoints = []
56                    }
57                  (Ident
58                     SrcSpanInfo
59                       { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 5 3 8
60                       , srcInfoPoints = []
61                       }
62                     "arr")
63              , PVar
64                  SrcSpanInfo
65                    { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 9 3 10
66                    , srcInfoPoints = []
67                    }
68                  (Ident
69                     SrcSpanInfo
70                       { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 9 3 10
71                       , srcInfoPoints = []
72                       }
73                     "i")
74              ]
75              (UnGuardedRhs
76                 SrcSpanInfo
77                   { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 11 3 18
78                   , srcInfoPoints =
79                       [ SrcSpan "tests/examples/InfixBang.hs" 3 11 3 12 ]
80                   }
81                 (App
82                    SrcSpanInfo
83                      { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 18
84                      , srcInfoPoints = []
85                      }
86                    (Var
87                       SrcSpanInfo
88                         { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16
89                         , srcInfoPoints = []
90                         }
91                       (UnQual
92                          SrcSpanInfo
93                            { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16
94                            , srcInfoPoints = []
95                            }
96                          (Ident
97                             SrcSpanInfo
98                               { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 13 3 16
99                               , srcInfoPoints = []
100                               }
101                             "arr")))
102                    (Var
103                       SrcSpanInfo
104                         { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18
105                         , srcInfoPoints = []
106                         }
107                       (UnQual
108                          SrcSpanInfo
109                            { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18
110                            , srcInfoPoints = []
111                            }
112                          (Ident
113                             SrcSpanInfo
114                               { srcInfoSpan = SrcSpan "tests/examples/InfixBang.hs" 3 17 3 18
115                               , srcInfoPoints = []
116                               }
117                             "i")))))
118              Nothing
119          ]
120      ]
121  , []
122  )
123