쉘 기능의 출력을 슬라임에서 가져 오는 방법은 무엇입니까?

Question

REPL에서, 우리는 일반적으로 출력을 얻을 수 있습니다 :

(shell "head -3 ~/misc.lisp") 
(asdf:make-build 'stumpwm :type :program :monolithic t 
      :move-here "." 
      :name-suffix "" 

그러나, 우리는 점액에 (shell "head -3 ~/misc.lisp")에서 전무를 얻을.

감사합니다.

Answer 1

사용 # '대신 쉘의 실행 - 쉘 명령을

(let ((str (ext:run-shell-command cmd :output :stream))) 
    (loop for line = (read-line str nil) 
     until (null line) 
     do (print line))) 

이제 작동합니다.

Answer 2

난 당신이 사용중인 리스프 구현 모르겠지만, 일반적으로 당신은 같은 쉘 명령을 실행하기 위해 패키지가 필요합니다

• trivial-shell
• inferior-shell
• clesh가 (위에 구축 사소한 쉘)