etc-gentoo/common-lisp/gentoo-init.lisp

12 lines
367 B
Common Lisp
Raw Normal View History

(in-package #:cl-user)
(let ((*compile-print* nil)
(*compile-verbose* nil)
#+cmu (ext:*gc-verbose* nil))
(handler-bind ((warning #'muffle-warning))
(load #p"/usr/share/common-lisp/source/asdf/asdf.lisp"
:print nil :verbose nil)
#+ecl
(load #p"/usr/share/common-lisp/source/asdf/asdf-ecl.lisp"
:print nil :verbose nil)))