Add support functions for SHARED-INITIALIZE as component in phase 1.
Add support functions for MAKE-INSTANCE as component in phase 1.