indexing
	description: "MIDL component creator"
	date: "$Date$"
	revision: "$Revision$"

deferred class
	EI_MIDL_COMPONENT_CREATOR

inherit
	EI_APP_CONSTANTS	

feature {NONE} -- Initialization

	make is
			-- Initialize object.
		do
			succeed := False
		end

feature -- Status report

	succeed: BOOLEAN
			-- Last operation succeed?

feature -- Basic operations

	create_from_eiffel_class (coclass: EI_CLASS) is
			-- Create from eiffel class.
		require
			non_void_coclass: coclass /= Void
		deferred
		end

end -- class EI_MIDL_COMPONENT_CREATOR