From d2767a102921b4a66f491f1c951911fa3c7b6fb6 Mon Sep 17 00:00:00 2001 From: rtoy <rtoy> Date: Wed, 8 Jun 2011 15:56:55 +0000 Subject: [PATCH] (require "asdf") loads asdf now. This change need to support the new recommended way of loading asdf2 with require. This is a backward compatible change. --- code/module.lisp | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/code/module.lisp b/code/module.lisp index b80ea433c..d1637674a 100644 --- a/code/module.lisp +++ b/code/module.lisp @@ -5,7 +5,7 @@ ;;; Carnegie Mellon University, and has been placed in the public domain. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/module.lisp,v 1.16 2010/05/12 02:50:11 rtoy Rel $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/module.lisp,v 1.17 2011/06/08 15:56:55 rtoy Exp $") ;;; ;;; ********************************************************************** @@ -140,6 +140,10 @@ (defmodule :defsystem "modules:defsystem/defsystem") +;; Allow user to load asdf using either (require :asdf) or (require +;; "asdf") (defmodule :asdf "modules:asdf/asdf") +(defmodule "asdf" + "modules:asdf/asdf") \ No newline at end of file -- GitLab