Полезная информация

Server for Information Technologies
Сервер поддерживается
Центром Информационных Технологий
(095) 932-9212, 932-9213, 939-0783
E-mail: info@citforum.ru
Сервер Информационных Технологий содержит море(!) аналитической информации

5.4.4. Реализация наследования

В языке Eiffel список наследования помещается вслед за ключевым словом inherit:

	class ITEM
	export
	  cut, move, pick, ungroup
	feature
	  cut is deferred end;
	  move (deltax, deltay: REAL) is deferred end;
	  pick (x, y: REAL): BOOLEAN is deferred end;
	  ungroup () is deferred end
	class SHAPE
	export
	  cut, draw, erase, move, pick, ungroup, write
	inherit ITEM
	feature
	* x, y: REAL;
	  cut is <body> end;
	  draw is <body> end;
	  erase is <body> end;
	  move (deltax, deltay: REAL) is <body> end;
	  pick (x, y: REAL): BOOLEAN is <body> end;
	  ungroup is <body> end;
	  write (acolor: COLOR) is deferred end;
	end
	classrBOX
	export pick, write
	inherit SHAPE redefine pick, write
	feature
	  width, height: REAL;
	  Create (x0, y0, width0, height0:*REAL) is <body> end;
	  pick (x, y: REAL): BOOLEAN is <body> end;
	  write (acolor: COLOR) is <body> end
	end
	class CIRCLE
	export pick, write
	inherit SHAPE redefine pick, write
	feature
	  radius: REAL;
	  Create (x0, y0, radius0: REAL) is <body> end;
	  pick (x, y: REAL): BOOLEAN is <body> end;
	  write (acolor: COLOR) is <body> end
	end

Для обозначения абстрактных операций используется ключевое слово deferred; такие операции должны быть реализованы во всех подклассах. Переопределение свойств класса в подклассе отмечается в разделе redefine.

В языке Smalltalk описание класса Item, его подкласса Shape, а также подклассов Box и Circle класса Shape может иметь следующий вид:

	class name Item
	superclass Object
	 
	class name Shape
	superclass Item
	instance variables
	  x
	  y
	instance methods
	  cut
	  draw
	  erase
	  move: aPoint
	  ungroup
	 
	class name Box
	superclass Shape
	instance variables
	  width
	  height
	instance methods
	  pick: aPoint
	  write: aColor
	class methods
	  createAt: aPoint width: widthSize length: lengthSize
	 
	class name Circle
	superclass Shape
	instance variables
	  radius
	instance methods
	  pick: aPoint
	  write: aColor
	class methods
	  createAt: aPoint radius: radiusSize

Все атрибуты суперкласса доступны всем его потомкам. Все методы могут быть переопределены в подклассах. Множественное наследование не поддерживается.

Назад | Содержание | Вперед


Comments: info@citmgu.ru
Copyright © CIT