;;; along with this program; if not, write to the Free Software Foundation,
;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-(defpackage #:mdw.collect
+(defpackage #:collect
(:use #:common-lisp #:mdw.base)
(:export #:collecting #:with-collection #:collect))
-(in-package mdw.collect)
+(in-package collect)
(eval-when (:compile-toplevel :load-toplevel)
(defvar *collecting-anon-list-name* (gensym)
;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
(defpackage #:mdw.unix
- (:use #:common-lisp #:mdw.base #:mdw.collect)
+ (:use #:common-lisp #:mdw.base #:collect)
(:export #:unix-error #:errno-value #:with-errno-handlers
#:syscall #:syscall*
#:stat #:sys-stat