comp.lang.ada
 help / color / mirror / Atom feed
From: "Mark Fisher" <mark.fisher@dial.pipex.com>
Subject: Re: Record comparision ?
Date: 1998/06/03
Date: 1998-06-03T00:00:00+00:00	[thread overview]
Message-ID: <01bd8f22$84740d20$1c4f95c1@default> (raw)
In-Reply-To: 3576214E.E7814E6B@adca01.enet.dec.com


What your example actually does is compare the addresses of REC_PTR1
and REC_PTR2.

In order to compare the contents use

if REC_PTR1.all = REC_PTR2.all
then
.........

or refer to the components you wish to compare indiviudally.



Prateek S Fulzele <prateek@adca01.enet.dec.com> wrote in article
<3576214E.E7814E6B@adca01.enet.dec.com>...
> Hi everybody!
> 
> Here I have some doubts regarding record comparisions done in ADA.
> 
> Read this code sample:
> 
> type REC_TYPE;
> type REC_PTR_TYPE is access REC_TYPE;
> type REC_TYPE is
>      record
> 	INT1 : INTEGER;
>         INT2 : INTEGER;
>      end record;
> 
> -- now I declare two variables of REC_PTR_TYPE
> REC_PTR1, REC_PTR2 : REC_PTR_TYPE;
> 
> -- then, assign some values to the record members of 
> -- REC_PTR1, REC_PTR2.
> ....
> 
> -- now I say:
> if REC_PTR1 < REC_PTR2 then
> 	-- do so and so ..
> end if;
> 
> What is this signify ?
> Does it mean that REC_PTR1.INT1 < REC_PTR2.INT1 or else ?
> 
> Please clarify.
> 
> Thanks in advance!
> 
> Prateek
> -- 
> -------------------------------------------------------------------
> Prateek S Fulzele
> Telecom Development Center,
> Digital Equipment India Ltd, 
> Bangalore
> -------------------------------------------------------------------
> 




  reply	other threads:[~1998-06-03  0:00 UTC|newest]

Thread overview: 4+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1998-06-04  0:00 Record comparision ? Prateek S Fulzele
1998-06-03  0:00 ` Mark Fisher [this message]
1998-06-05  0:00 ` Niklas Holsti
1998-06-08  0:00 ` John English
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox