ASDF 억제 :로드 시스템 콘솔 출력

Question

나는 철강 뱅크 공통 Lisp를 사용하여 작은 프로젝트를 만들었고, 나는 ASDF를 사용하여 컴파일하고 그것을로드하고 있습니다.로드 명령은

입니다

(asdf:load-system :<my-system>)

.

모든 것이 잘 작동합니다 (프로그램이 컴파일되고 잘 작동합니다)하지만

와 같은 출력을 유지합니다.

; compiling file "[...].lisp" (written 13 APR 2014 06:20:03 PM):
; compiling (DEFPACKAGE :<my-package> ...)
; compiling (DEFUN <my-func-1> ...)
; compiling (DEFUN <my-func-2> ...)
; compiling (DEFUN <my-func-3> ...)

.

프로그램이 다시 컴파일 될 때마다

이 출력이

와 함께 응용 프로그램을 호출하기 때문에 asdf에서 온다고 가정합니다.

sbcl --noinform --noprint --script runner_sbcl.lisp

.

여기서 runner_sbcl.lisp는 asdf:load-system를 통해 실제 응용 프로그램을로드합니다.그래서 나는 가정한다 이 출력은 sbcl에서옵니다.

asdf:load-system에서 콘솔 출력을 비활성화하는 방법이 있습니까?컴파일 오류 / 경고에 대해서만 알림을 받고 싶습니다. 문서에서 정보를 찾을 수 없습니다.

Answer 1

어떨까요

(setf *load-verbose* nil)
(setf *load-print* nil)
(setf *compile-verbose* nil)
(setf *compile-print* nil)

.

?

왜 그들은 그들이 설정되어 있습니까?

Answer 2

이것은 QuickLisp의 QL : QuickLoad를 사용하는 유사한 문제에 대한 내 해결 방법입니다.

(with-output-to-string (*standard-output*)
  ;; asdf:load-system or ql:quickload..
  (asdf:load-system :<your-system>))

.