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.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM autolearn=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,7b5b3c67aa2a73fe X-Google-Attributes: gid103376,public X-Google-Language: ENGLISH,ASCII-7-bit Path: g2news2.google.com!news1.google.com!news.germany.com!news.motzarella.org!talisker.lacave.net!lacave.net!feed.xsnews.nl!border-1.ams.xsnews.nl!newsfeed-fusi2.netcologne.de!newsreader3.netcologne.de!news.netcologne.de!nhp.netcologne.de!newsfeed.arcor.de!newsspool2.arcor-online.net!news.arcor.de.POSTED!not-for-mail Newsgroups: comp.lang.ada Subject: Re: Easy question about Character manipulation From: Georg Bauhaus In-Reply-To: References: <1170100860.762334.13830@l53g2000cwa.googlegroups.com> <1d5n0ksoz75yy.3t2hhxjr35fq$.dlg@40tude.net> <1170106218.6329.63.camel@localhost> Content-Type: text/plain Content-Transfer-Encoding: 7bit Organization: # Message-Id: <1170121405.6329.89.camel@localhost> Mime-Version: 1.0 X-Mailer: Evolution 2.6.1 Date: Tue, 30 Jan 2007 02:43:26 +0100 NNTP-Posting-Date: 30 Jan 2007 02:43:22 CET NNTP-Posting-Host: 0aae59ca.newsspool4.arcor-online.net X-Trace: DXC=YKW`19i]W^P5TOT9_N5i On Tue, 2007-01-30 at 00:51 +0000, (see below) wrote: > On 29/1/07 21:30, in article 1170106218.6329.63.camel@localhost, "Georg > Bauhaus" wrote: > > Unlike Pascal, for example, types in Ada are different when > > they have different names. > > On the contrary, this *exactly* like (ISO Standard) Pascal. I don't think so, if a Pascal compiler is supposed to determine "the same type" (exact same type) by looking at the definition, not the name. Otherwise two compilers claiming to support ISO Pascal are broken: program p; type T = 1 .. 3; S = 1 .. 3; var x : T; y : S; begin x := y; { fine in Pascal } end. This program seems to be Standard Pascal, and compiles. The corresponding Ada program will not compile: procedure p is type T is range 1 .. 3; type S is range 1 .. 3; x : T; y : S begin x := y; -- not the same type, compilation error end;