Re: managing a resource of instances

[Stan Lanning <Lanning.pa@Xerox.COM>]

I think this is a good reason why programs should provide their own constructors
instead of using MAKE-INSTANCE as their public interface to object creation.  If
you defined your own MAKE-FONT function, you could accomplish exactly what you
want:

(defun MAKE-FONT (&rest initargs)
  (or (FIND-FONT initargs)
      (CACHE-FONT (apply #'MAKE-INSTANCE 'font initargs)
                  initargs)))


----- smL