lispbox: return number in attempt-guess

This commit is contained in:
Jeremy Baxter 2024-04-16 20:42:25 +12:00
parent 957eefb55d
commit d590784a3a

View file

@ -30,7 +30,7 @@ is the number the user is trying to guess."
(when (= guess number) (when (= guess number)
(setf incorrect nil)) (setf incorrect nil))
while incorrect)) while incorrect))
t) number)
(defun begin-number-guessing-game (&key one-shot (maximum 100)) (defun begin-number-guessing-game (&key one-shot (maximum 100))
"If `one-shot' is t, run one round of a number guessing game. "If `one-shot' is t, run one round of a number guessing game.