| Paste number 94640: | untitled |
| Pasted by: | Demosthenes |
| When: | 1 year, 11 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+210W |
| Channel: | #lisp |
| Paste contents: |
#!/usr/local/bin/sbcl --script
;;; Muffle compiler-notes globally, doesn't work
(setf *error-output* (open "/dev/null" :direction :output :element-type 'character :IF-EXISTS :OVERWRITE))
(setf *standard-error* (open "/dev/null" :direction :output :element-type 'character :IF-EXISTS :OVERWRITE))
(setf *load-verbose* nil)
(declaim (sb-ext:muffle-conditions sb-ext:compiler-note ))
(declaim (sb-ext:muffle-conditions warning ))
----------------------------------------------
on execution:
; loading system definition from /usr/local/lib/sbcl/sb-grovel/sb-grovel.asd
; into #<PACKAGE "ASDF2">
; registering #<SYSTEM SB-GROVEL {B020889}> as SB-GROVEL
This paste has no annotations.