pFile :: Parser MGProfile
pFile = do
    settings <- many pSetting
    eof
    return $ foldr ($) mkMGProfile settings
pFile :: Parser MGProfile
pFile = do
    settings <- many pSetting
    eof
    return $ foldr ($) mkMGProfile settings
pFile = do
    settings <- many pSetting
    eof
    return $ foldr ($) mkMGProfile settings