相关疑难解决方法(0)

我正在尝试创建一个函数,它将元组列表作为参数并按第二个元素排序.它不打印任何其他,只是错误'***异常:main.hs:20:1-76:函数sortWords中的非详尽模式'这是代码:

sortWords :: [(String, Int)] -> [(String, Int)]

sortWords [(str,num)] = sortBy (\x y -> compare (snd x) (snd y)) [(str,num)]`

以下是我如何调用该函数

main = do
    putStrLn $ show $ sortWords [("friend",1),("she",2)]

我不得不说我在http://Repl.it网站上运行我的程序

谢谢!