ParseOk (Module (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 5, srcSpanEndColumn = 1}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 3, srcSpanEndColumn = 1},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 3, srcSpanEndColumn = 1},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 3, srcSpanEndColumn = 1},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 5, srcSpanStartColumn = 1, srcSpanEndLine = 5, srcSpanEndColumn = 1},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 5, srcSpanStartColumn = 1, srcSpanEndLine = 5, srcSpanEndColumn = 1}]}) Nothing [] [] [ForImp (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 1, srcSpanEndLine = 3, srcSpanEndColumn = 8},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 9, srcSpanEndLine = 3, srcSpanEndColumn = 15},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 29, srcSpanEndLine = 3, srcSpanEndColumn = 42},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 14, srcSpanEndLine = 4, srcSpanEndColumn = 16}]}) (CCall (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 16, srcSpanEndLine = 3, srcSpanEndColumn = 21}, srcInfoPoints = []})) (Just (PlayRisky (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 3, srcSpanStartColumn = 22, srcSpanEndLine = 3, srcSpanEndColumn = 28}, srcInfoPoints = []}))) (Just "getProgArgv") (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 2, srcSpanEndLine = 4, srcSpanEndColumn = 13}, srcInfoPoints = []}) "getProgArgv") (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 17, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 26, srcSpanEndLine = 4, srcSpanEndColumn = 28}]}) (TyApp (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 17, srcSpanEndLine = 4, srcSpanEndColumn = 25}, srcInfoPoints = []}) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 17, srcSpanEndLine = 4, srcSpanEndColumn = 20}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 17, srcSpanEndLine = 4, srcSpanEndColumn = 20}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 17, srcSpanEndLine = 4, srcSpanEndColumn = 20}, srcInfoPoints = []}) "Ptr"))) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 21, srcSpanEndLine = 4, srcSpanEndColumn = 25}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 21, srcSpanEndLine = 4, srcSpanEndColumn = 25}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 21, srcSpanEndLine = 4, srcSpanEndColumn = 25}, srcInfoPoints = []}) "CInt")))) (TyFun (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 29, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 47, srcSpanEndLine = 4, srcSpanEndColumn = 49}]}) (TyApp (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 29, srcSpanEndLine = 4, srcSpanEndColumn = 46}, srcInfoPoints = []}) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 29, srcSpanEndLine = 4, srcSpanEndColumn = 32}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 29, srcSpanEndLine = 4, srcSpanEndColumn = 32}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 29, srcSpanEndLine = 4, srcSpanEndColumn = 32}, srcInfoPoints = []}) "Ptr"))) (TyParen (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 33, srcSpanEndLine = 4, srcSpanEndColumn = 46}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 33, srcSpanEndLine = 4, srcSpanEndColumn = 34},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 45, srcSpanEndLine = 4, srcSpanEndColumn = 46}]}) (TyApp (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 34, srcSpanEndLine = 4, srcSpanEndColumn = 45}, srcInfoPoints = []}) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 34, srcSpanEndLine = 4, srcSpanEndColumn = 37}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 34, srcSpanEndLine = 4, srcSpanEndColumn = 37}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 34, srcSpanEndLine = 4, srcSpanEndColumn = 37}, srcInfoPoints = []}) "Ptr"))) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 38, srcSpanEndLine = 4, srcSpanEndColumn = 45}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 38, srcSpanEndLine = 4, srcSpanEndColumn = 45}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 38, srcSpanEndLine = 4, srcSpanEndColumn = 45}, srcInfoPoints = []}) "CString")))))) (TyApp (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 50, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = []}) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 50, srcSpanEndLine = 4, srcSpanEndColumn = 52}, srcInfoPoints = []}) (UnQual (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 50, srcSpanEndLine = 4, srcSpanEndColumn = 52}, srcInfoPoints = []}) (Ident (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 50, srcSpanEndLine = 4, srcSpanEndColumn = 52}, srcInfoPoints = []}) "IO"))) (TyCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 54},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 54, srcSpanEndLine = 4, srcSpanEndColumn = 55}]}) (Special (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 54},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 54, srcSpanEndLine = 4, srcSpanEndColumn = 55}]}) (UnitCon (SrcSpanInfo {srcInfoSpan = SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 55}, srcInfoPoints = [SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 53, srcSpanEndLine = 4, srcSpanEndColumn = 54},SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 4, srcSpanStartColumn = 54, srcSpanEndLine = 4, srcSpanEndColumn = 55}]})))))))],[Comment True (SrcSpan {srcSpanFilename = "tests/examples/ForeignImport.hs", srcSpanStartLine = 1, srcSpanStartColumn = 1, srcSpanEndLine = 2, srcSpanEndColumn = 67}) " If compiled without ForeignFunctionInterface (part of Haskell2010),\n   it complains not about FFI but about missing TemplateHaskell "])