indexing
	description: "Objects that represent the Vision2 application.%
		%The original version of this class has been generated by EiffelBuild."
	date: "$Date$"
	revision: "$Revision$"

class
	ROOT_CLASS

inherit
	EV_APPLICATION

create
	make_and_launch
	
feature {NONE} -- Initialization

	make_and_launch is
			-- Create `Current', build and display `main_window',
			-- then launch the application.
		local
			pro: PROFILING_SETTING
		do
			create pro.make
			pro.stop_profiling
			default_create
			create main_window
			main_window.show
			launch
			pro.start_profiling
		end
		
feature {NONE} -- Implementation

	main_window: EDITOR_WINDOW
		-- Main window of `Current'.

end -- class ROOT_CLASS