Kiedy format faktycznie się drukuje w Common Lisp?

Question

Mam następujący wspólny kod Lisp:

(defun micro-read-eval-print() 
    (format t "Micro > ") 
    (let ((form (read-line))))) 

Kiedy go uruchomić, pojawia się następujący:

CL-USER> (micro-read-eval-print) 
(m-quote a) 
Micro > NIL 

pamiętać, że wpisany w "(m-quote a)", natomiast Wyjście interpretera Lisp "Micro> NIL".

Teraz oczekiwałbym, że te wydarzenia się zdarzą w odwrotnej kolejności. Spodziewałbym się, że "Micro>" zostanie wydrukowane jako pierwsze, ponieważ deklaracja formatu jest najważniejsza. Dlaczego nie jest drukowany jako pierwszy? I co muszę zrobić, aby upewnić się, że zostanie wydrukowany pierwszy?

Answer 1

spróbuj dodać

(defun micro-read-eval-print() 
    (format t "Micro > ") 
    (finish-output) 
    (let ((form (read-line))))) 

wierzę napotkania buforowanie standardowym IO (stdio), który w C, jest powszechnie omijane poprzez fflush() w tym języku.

finish-output wydaje się być odpowiednikiem standardowej Lisp biblioteki standardowej C fflush.