From 74d4705d8a3f6e52ad954f5c3b11f39256dbd179 Mon Sep 17 00:00:00 2001
From: layer <layer>
Date: Tue, 20 Jul 1999 04:52:41 +0000
Subject: [PATCH] 2.2.2.7 -- join from acl50 branch

---
 utils/clos.lisp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/utils/clos.lisp b/utils/clos.lisp
index 894751c2..b979be60 100644
--- a/utils/clos.lisp
+++ b/utils/clos.lisp
@@ -16,7 +16,7 @@
 ;; Commercial Software developed at private expense as specified in
 ;; DOD FAR Supplement 52.227-7013 (c) (1) (ii), as applicable.
 ;;
-;; $Id: clos.lisp,v 1.17 1999/02/25 08:23:46 layer Exp $
+;; $Id: clos.lisp,v 1.18 1999/07/20 04:52:41 layer Exp $
 
 ;;;
 ;;; Copyright (c) 1989, 1990 by Xerox Corporation.  All rights reserved.
@@ -27,7 +27,7 @@
 (in-package :clim-utils)
 
 #+Allegro-v4.0-constructors
-(require :constructor)
+(eval-when (compile eval load) (require :constructor))
 
 ;;; ----------------
 ;;; Constructors
-- 
GitLab