remove putStrLn
state modified to TVar ChatState