-;;; This is asdf: Another System Definition Facility. 1.77
+;;; This is asdf: Another System Definition Facility. 1.79
;;;
;;; Feedback, bug reports, and patches are all welcome: please mail to
;;; <cclan-list@lists.sf.net>. But note first that the canonical
(in-package #:asdf)
-(defvar *asdf-revision* (let* ((v "1.77")
+(defvar *asdf-revision* (let* ((v "1.79")
(colon (or (position #\: v) -1))
(dot (position #\. v)))
(and v colon dot
(defvar *compile-file-warnings-behaviour* :warn)
(defvar *compile-file-failure-behaviour* #+sbcl :error #-sbcl :warn)
-(defvar *verbose-out* *trace-output*)
+(defvar *verbose-out* nil)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; utility stuff
:original-initargs args args))
(*verbose-out*
(if (getf args :verbose t)
- *verbose-out*
+ *trace-output*
(make-broadcast-stream)))
(system (if (typep system 'component) system (find-system system)))
(steps (traverse op system)))
*central-registry*)
(pushnew 'module-provide-asdf sb-ext:*module-provider-functions*))
+
+(provide 'asdf)