Re: Record comparision ?

[Niklas Holsti <nholsti@icon.fi>]

Prateek S Fulzele wrote:
> 
> 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 ?

The ordering operators "<" etc. are not predefined for access types
such as REC_PTR_TYPE (nor for record types such as REC_TYPE),
therefore the above has no significance in Ada and any Ada compiler
should
reject it with an error message.

If you want to, you can define "<" for REC_PTR_TYPE or REC_TYPE to
have any meaning you like, by writing your own function with the profile

   function "<" (Left, Right: REC_PTR_TYPE)
   return boolean

or using REC_TYPE, respectively.