Reading Text from the User
; Read in a line of text from the user.
(defun text-from-user ()
(format t "Enter some text: ")
(let ((user-text (read-line t)))
(format t "You entered: ~A" user-text)
'bye
) )
; T means the input comes from the keyboard.
Previous slide
Next slide
Back to first slide
View graphic version