[Ada][Programmation Orienté Objet] déclaration de procédure abstraite.

déclaration de procédure abstraite. [Ada][Programmation Orienté Objet] - Ada - Programmation

Marsh Posté le 25-07-2011 à 05:55:13    

Bonjour,
J'avais cru comprendre que si je déclare une procédure abstraite pour un type abstrait, je devais déclarer une procédure effective pour tout type dérivé de la Wide class...
 
Voici ce que j'ai fait :
 

Code :
  1. with Mos.Types;                          use Mos.Types;
  2. package Mos.objects is
  3.  
  4.    type Object_Type is abstract tagged null record;
  5.  
  6.    type Object_Type_Access is access all Object_type'Class;
  7.    procedure Make(Object : out Object_Type_Access) is abstract;
  8. end Mos.objects;


Code :
  1. with Mos.Objects.Table;
  2. use Mos.Objects.Table;
  3. package Mos.Objects.Enum is
  4.  
  5.    type Enum_Object_Type is
  6.      new Object_Type with
  7.       record
  8.          Enum : Table_Object_access;
  9.       end record;
  10.  
  11.    type Enum_Object_Access is access all Enum_Object_Type'Class;
  12. end Mos.Objects.Enum;


 
Je déclare en fin mes with and use mais le compilateur ne me dit rien sur l'obligation de déclarer une procédure Make pour le type Enum_Object_Type qui est un dérivé de Object_Type.
 
De l'aide s'il vous plaît.
Merci bien.

Reply

Marsh Posté le 25-07-2011 à 05:55:13   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed