indexing
	description	: "System's root class"
	author: "Khu"
	date: "07-11-19$"

class CLIENT_OF_CLOCKS

create
	make

feature

	make is
		local
			clock		: CLOCK					-- Referenz, die sich auf nichts bezieht
			e_clock		: expanded CLOCK		-- Objekt, per Default initialisiert
			clock_e		: CLOCK_EXPANDED		-- Objekt, per Default initialisiert
			clock_exp	: CLOCK_EXP				-- Objekt, per Default initialisiert
			clock_r		: CLOCK_REFERENCED		-- Referenz, die sich auf nichts bezieht
		do
			create clock					-- Explizite Objekterzeugung, Defaultinitialisierung
			clock.set (12, 30)				-- Implizite Dereferenzierung
			clock.tick
			
			e_clock.set (12, 30)
			e_clock.tick
	
			clock_e.set (12, 30)
			clock_e.tick
	
			clock_exp.set (12, 30)
			clock_exp.tick
	
			create clock_r					-- Explizite Objekterzeugung, Defaultinitialisierung
			clock_r.set (12, 30)			-- Implizite Dereferenzierung
			clock_r.tick
		end -- make

end -- class CLIENT_OF_CLOCKS