Wrote define-component-instance and define-generic-component.