1ParseOk
2  ( Module
3      SrcSpanInfo
4        { srcInfoSpan =
5            SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 9 1
6        , srcInfoPoints =
7            [ SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 1
8            , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1
9            , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1
10            , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 3 1
11            , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 9 1 9 1
12            , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 9 1 9 1
13            ]
14        }
15      Nothing
16      [ LanguagePragma
17          SrcSpanInfo
18            { srcInfoSpan =
19                SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 29
20            , srcInfoPoints =
21                [ SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 1 1 13
22                , SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 26 1 29
23                ]
24            }
25          [ Ident
26              SrcSpanInfo
27                { srcInfoSpan =
28                    SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 1 14 1 25
29                , srcInfoPoints = []
30                }
31              "QuasiQuotes"
32          ]
33      ]
34      []
35      [ SpliceDecl
36          SrcSpanInfo
37            { srcInfoSpan =
38                SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 8 3
39            , srcInfoPoints = []
40            }
41          (QuasiQuote
42             SrcSpanInfo
43               { srcInfoSpan =
44                   SrcSpan "tests/examples/QuasiQuoteToplevel.hs" 3 1 8 3
45               , srcInfoPoints = []
46               }
47             "undefined"
48             "\nthis quasiquote is acceptable to ghc's\nparser. Previously hse would reject this\nbecause -XTemplateHaskell is not enabled\nto allow \"expressions\" at top-level\n")
49      ]
50  , []
51  )
52