+;;;--------------------------------------------------------------------------
+;;; Static instances.
+
+(export 'make-static-instance)
+(defgeneric make-static-instance (class name initializers pset location &key)
+ (:documentation
+ "Construct a new static instance of the given CLASS.
+
+ This is the main constructor functoin for static instances. This is a
+ generic function so that the CLASS can construct static instances in a
+ special way."))
+