Re: newbie - OOP in Ada Set and Get Methods

["R" <ruthless@poczta.onet.pl>]

Jeff C r e e.m wrote:
> A few tips to think about
>
> 1) Packages are closer to namespaces than classes.
>     Your "field" variable is essentially just a stand alone 'global'
value
> that is in no way tied to your class
>
> 2) Tagged records are closer to "classes"

so if my class has 7 varaibles(3 of them are dynamically allocated
arrays) they should be all included inside tagged record?

That means that when im creating an object I have to pass as parameters
all
the variables?

> 3) There is no "this" in Ada so if you want an object to be visible
within a
> subprogram it needs to be a parameter.

thanks, I didn't know that

And one more thing about the tutorial which You said should be
shutdown.

It's written there that there is no such thing as contructor.
You'll have to define this function yourself.

so if I want create an object you should write sth like this:
object : testclass.rec1_Type := testclass.Create(10);

how should Create body look like?

rec1_Type is access to rec1 defined as tagged record with one variable
'field'.

when I wrote(package testclass):

function Create(s: Integer) return rec1_Type is
begin
return testclass.rec1_Type(field=>s);
end Create;

gnatmake gave me an error:

$ gnatmake main.adb
gcc -c testclass.adb
testclass.adb:5:33: invalid prefix in call
gnatmake: "testclass.adb" compilation error

where 5th line points to the return statement:
return testclass.rec1_Type(field=>s);
what am I doing wrong?

sorry... I'm just a Ada newbie

best regards R