A simple hangman game in common lisp