haskell에서의 간단한 입력 오해

Question

마지막 줄이 잘못된 이유와 그것을 고칠 수있는 방법을 설명하는 사람은 누구입니까? 모르겠다. 오류 :

Answer 1

괄호가 없습니다.

... 
else do return (length line) 

그러나 유형 오류도 있습니다. edasaNr 함수의 유형은 무엇입니까? 인수가 주어진 경우 일부 IO를 수행하고 Int을 반환해야합니다.

그래서 그것이 더 나은로 기록 될 것입니다 : 또한 당신이 n 인수를 사용하지 않는 것을 알 수

edastaNr :: a -> IO Int 
edastaNr n = do 
    putStrLn "Anna rida:" 
    line <- getLine 
    if null line 
    then return 0 
    else return $ length line 

(그래서 모든 유형을 가질 수 있습니다).