language: Common Lisp (clisp) (clisp 2.47)
date: 126 days 0 hours ago
link:
visibility: public 
1
2
3
4

(defun prompt-read (prompt)
  (format *query-io* "~a: " prompt)
  (force-output *query-io*)
  (read-line *query-io*))