indexing
	description: "Storage Routines."
	status: "See notice at end of class"
	date: "$Date$"
	revision: "$Revision$"

class interface
	ECOM_STORAGE_ROUTINES

feature -- Access
--	com_api: ECOM_COM is
--		once
--			create Result
--		end

	guid_routines: ECOM_GUID_ROUTINES
			-- (from ECOM_ROUTINES)
	
feature -- Basic Operations

	is_compound_file (a_name: STRING): BOOLEAN
			-- Does file a_name contain a storage object?
	
invariant

		-- from ANY
	reflexive_equality: standard_is_equal (Current)
	reflexive_conformance: conforms_to (Current)

end -- class ECOM_STORAGE_ROUTINES