From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,c7f5c70275787af8
X-Google-Attributes: gid103376,public
From: "Steve Doiel" <nospam_steved@pacifier.com>
Subject: Re: Ada vs Delphi?
Date: 1999/08/10
Message-ID: <37b0dddd.0@news.pacifier.com>#1/1
X-Deja-AN: 511290970
References: <37ab421a.5414989@news.total.net> <37ab8bd1.0@news.pacifier.com>
 <37ae1fc8.653954@news.clara.net> <37ae6b73.0@news.pacifier.com>
 <m3vhanjyac.fsf@vault81.infomatch.bc.ca>
X-Trace: 10 Aug 1999 19:20:13 PST, 216.65.141.162
Newsgroups: comp.lang.ada
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
Date: 1999-08-10T00:00:00+00:00
List-Id: <comp.lang.ada>

Ray Blaak wrote in message ...

>Actually, in Delphi, this is supposed to be the equivalent of the Ada:
>
>   type
>     length = type double;
>     weight = type double;
>
>On the other hand, I don't know if the compiler actually enforces it, but I
>believe it is supposed to.
>

The following compiles with no errors on Delphi 3

procedure TForm1.FormCreate(Sender: TObject);
  type
    length = type double;
    weight = type double;
  var
   a : length;
   b : weight;
begin
  a := b;
end;

But thanks, I had never seen that syntax before.

SteveD

>--
>Cheers,                                        The Rhythm is around me,
>                                               The Rhythm has control.
>Ray Blaak                                      The Rhythm is inside me,
>blaak@infomatch.com                            The Rhythm has my soul.