ParseOk ( Module SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 4 1 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 4 1 4 1 , SrcSpan "tests/examples/LineOptionsPragma.hs" 4 1 4 1 ] } (Just (ModuleHead SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 18 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 3 1 3 7 , SrcSpan "tests/examples/LineOptionsPragma.hs" 3 13 3 18 ] } (ModuleName SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 3 8 3 12 , srcInfoPoints = [] } "Fail") Nothing Nothing)) [ OptionsPragma SrcSpanInfo { srcInfoSpan = SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 16 , srcInfoPoints = [ SrcSpan "tests/examples/LineOptionsPragma.hs" 1 1 1 13 , SrcSpan "tests/examples/LineOptionsPragma.hs" 1 13 1 16 ] } Nothing "" ] [] [] , [ Comment True (SrcSpan "tests/examples/LineOptionsPragma.hs" 2 1 2 48) "# LINE 49 \"src/Language/C/Parser/Lexer.x\" #" ] )