Fix a minor error

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