ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 1 1 1 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 1 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 4 1 4 1 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 4 1 4 1 ] } Nothing [ LanguagePragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 1 1 29 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 1 1 13 , SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 26 1 29 ] } [ Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 1 14 1 25 , srcInfoPoints = [] } "QuasiQuotes" ] ] [] [ PatBind SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 18 , srcInfoPoints = [] } (PVar SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 4 , srcInfoPoints = [] } (Ident SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 1 3 4 , srcInfoPoints = [] } "foo")) (UnGuardedRhs SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 5 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 5 3 6 ] } (QuasiQuote SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/QuasiQuoteExpr2.hs" 3 7 3 18 , srcInfoPoints = [] } "q" " a b ")) Nothing ] , [] )