printFileDirContent (file:dirContent) = do putStr file
if length dirContent == 1
then putStr "\n"
else putStr "end\n"
printFileDirContent dirContent
пишет что parse error (possibly incorrect indentation) в строке
then putStr "\n".
Здравствуйте, Аноним, Вы писали:
А>А>printFileDirContent (file:dirContent) = do putStr file
А> if length dirContent == 1
А> then putStr "\n"
А> else putStr "end\n"
А> printFileDirContent dirContent
А>
А>пишет что parse error (possibly incorrect indentation) в строке then putStr "\n".
Делай отступ:
printFileDirContent (file:dirContent) = do putStr file
if length dirContent == 1
then putStr "\n"
else putStr "end\n"
printFileDirContent dirContent
Здравствуйте, Аноним, Вы писали:
А>пишет что parse error (possibly incorrect indentation) в строке then putStr "\n".
http://en.wikibooks.org/wiki/Haskell/Indentation#if_within_do
Здравствуйте, Аноним, Вы писали:
А>>пишет что parse error (possibly incorrect indentation) в строке then putStr "\n".
А>Делай отступ:
А>А>printFileDirContent (file:dirContent) = do putStr file
А> if length dirContent == 1
А> then putStr "\n"
А> else putStr "end\n"
А> printFileDirContent dirContent
А>
printFiles = mapM_ putStrLn
end = putStrLn "end"
printFileDirContent dirContent = printFiles dirContent >> end