кек, нуокей

вот оно

ЧЯДНТ?

(loop
:for i :from 1 :to 1000
:do  (let ((proc (uiop:launch-program "cat bumblebee.conf"
                                      :output :stream :error-output :stream)))
       (print (uiop:process-info-pid proc))          
       (let ((stream (uiop:process-info-output proc))) ; consume stream
         (loop :for line = (read-line stream nil)
               :while line
               :collect line))
       (unless (= 0 (uiop:wait-process proc)) ; wait till end
         "Fail!")))

чому он не закрывает фаелы, да так что uiop не может потом вообще ничего сделать?

я же ждукаю для каждого i

советы вбок

:repeat 1000

если я ничего не напутал

ага

так, ларчик просто открывался

нужен `uiop:close-streams`

аутпут стрим-объедки своей жизнью живут и не диспозятся. А должны?

Про простой руками сделанный стрим если забыть, его же скушает ГЦ?

без close-streams у всех этих fd-streams будет один и тот же fd, и вообще все то же самое.

Пыжня какая-то. Короче. close-streams. Даже если процесс считается мертвым. Всегда.

у меня тут включили отопление с такой силой что мне аж хуевас
невозможно чето делать в таких условиях
Поэтому я решил пострадать хуйней
https://gist.github.com/commander-trashdin/4b547fdfba08c1de0a795917b29698a3
даже не смешно но все равно

приделать семантический анализ докстринга и