class A feature {NONE} -- Test

	make
			-- An obsolete procedure.
		obsolete "Inherited. [$(YESTERDAY)]"
		do
		end

end