RosettaCodeData/Task/User-input-Graphical/Common-Lisp/user-input-graphical-3.lisp
2023-07-01 13:44:08 -04:00

2 lines
108 B
Common Lisp

(capi:prompt-for-integer "Enter an integer:"
:ok-check #'(lambda (n) (= n 75000)))