Re: Help - Constructors - ASAP.

[Matthew Heaney <matthew_heaney@acm.org>]

"Maxim Senin" <maks.tech.swh.lv> writes:

> I thought about defining functions:
> 
> function newEvent (eventSource : Object, eventType : EventTypes, eventData :
> EventDataType) return Event is
> ret    : Event;
> begin
>     ret := new Event;
>     ret.source := eventSource;
>     return  (eventSource, eventType, eventData);
> end;


In general, functions in Ada serve the role that constructors play in
other languages.  Your New_Event function is one example of a
constructor.

If the return type is tagged, then do NOT return the specific type as
the return type of the function.  Either return the classwide type, or
declare the constructors in a nested package called Constructors.  This
way, the functions won't be primitive operations for the type, and
therefore won't be inherited during derivation.