- (unless (class-finalized-p class) (finalize-inheritance class))
- (allocate-funcallable-instance (class-wrapper class)))
+ (unless (class-finalized-p class)
+ (finalize-inheritance class))
+ (allocate-standard-funcallable-instance (class-wrapper class)))