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