From 6a53ead77587bd2336e86c233045bdb69cf0e1a1 Mon Sep 17 00:00:00 2001
From: rtoy <rtoy>
Date: Tue, 11 May 2010 02:21:46 +0000
Subject: [PATCH] PROVIDE DEFSYSTEM as well as MAKE so that REQUIRE won't load
 defsystem again if it's already loaded.

---
 contrib/defsystem/defsystem.lisp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/contrib/defsystem/defsystem.lisp b/contrib/defsystem/defsystem.lisp
index bf349e54c..2d7f0eaf9 100644
--- a/contrib/defsystem/defsystem.lisp
+++ b/contrib/defsystem/defsystem.lisp
@@ -1072,7 +1072,9 @@
 (provide 'make)
 
 #-(or :cltl2 :lispworks)
-(provide 'make)
+(progn
+  (provide 'make)
+  (provide 'defsystem))
 
 (pushnew :mk-defsystem *features*)
 
-- 
GitLab