RT，请问为什么这样的语法是错误的？

tail' :: [a] -> a
tail' [] = error "idiot"
tail' (xs ++ [x]) = x