doParseProgram :: SourceName -> String -> Either ParseError CoreProgram
doParseProgram = parse pProgram
doParseProgram :: SourceName -> String -> Either ParseError CoreProgram
doParseProgram = parse pProgram
doParseProgram = parse pProgram