putStrLn "Enter the Artist Name"
art <- getLine
putStrLn "Enter the Number of CD's"
num <- getLine
let test= buyItem currentStockBase art num
printListIO (showcurrentList test)
BuyItemに渡さなければならない値は
buyItem currentStockBase "Akon" 20
でも「エイコン」をアートに送りたいし、20年はnumを送りたい
それは私にこのエラーを与えます
ERROR file:.\Project2.hs:126 - Type error in application
*** Expression : buyItem currentStockBase art num
*** Term : num
*** Type : [Char]
*** Does not match : Int
私を助けてください