A simple chat program in Racket