; disable an irritating SBCL flag
#+SBCL (DECLAIM (SB-EXT:MUFFLE-CONDITIONS CL:STYLE-WARNING))

(defun make  (&optional (system "iccle")) (make1 system))
(defun make! (&optional (system "iccle")) (make1 system t))

(defun make1  (sys &optional forcep)  
  (asdf:operate 'asdf:load-source-op sys :force forcep :verbose nil))