common-lisp - Lisp の read 関数の問題

Question

ユーザー入力のプロンプトを作成しようとしていますが、この関数を呼び出すたびに、「:」を出力する代わりに、何かを押すまで待機し、その後文字「:」を出力します。

ウェブ上で何も見つかりません。

(defun MovimientoAdversario ()
  (let ((aux))
    (format t "~% :")
    (setf aux (read))))

Answer 1

読み取る前に出力バッファをフラッシュしてみてください。

(format t "~% :")
(force-output)
(setf aux (read))