Fix a minor error

(True,"a") 的型别是 (Bool,[Char])
(True,'a')的型别才是(Bool,Char)