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.0 required=5.0 tests=BAYES_00,FORGED_HOTMAIL_RCVD2, FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4 X-Google-Thread: 103376,60fe876e7675f11 X-Google-NewGroupId: yes X-Google-Attributes: gida07f3367d7,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII Received: by 10.68.222.71 with SMTP id qk7mr14713438pbc.1.1328637361786; Tue, 07 Feb 2012 09:56:01 -0800 (PST) Path: lh20ni271275pbb.0!nntp.google.com!news2.google.com!postnews.google.com!gi10g2000vbb.googlegroups.com!not-for-mail From: Gautier write-only Newsgroups: comp.lang.ada Subject: Re: Weird behavior with modular type Date: Tue, 7 Feb 2012 09:54:36 -0800 (PST) Organization: http://groups.google.com Message-ID: References: NNTP-Posting-Host: 62.203.198.182 Mime-Version: 1.0 X-Trace: posting.google.com 1328637361 23583 127.0.0.1 (7 Feb 2012 17:56:01 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Tue, 7 Feb 2012 17:56:01 +0000 (UTC) Complaints-To: groups-abuse@google.com Injection-Info: gi10g2000vbb.googlegroups.com; posting-host=62.203.198.182; posting-account=gRqrnQkAAAAC_02ynnhqGk1VRQlve6ZG User-Agent: G2/1.0 X-Google-Web-Client: true X-Google-Header-Order: HNKUARELSC X-HTTP-UserAgent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/535.7 (KHTML, like Gecko) Chrome/16.0.912.77 Safari/535.7,gzip(gfe) Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Date: 2012-02-07T09:54:36-08:00 List-Id: On 7 f=E9v, 18:24, Yannick Duch=EAne (Hibou57) > =A0 =A0 =A0 =A0B :=3D E < 10 ** I; E is of type Modular_Type. 10 ** I is untyped (Universal_Integer ?). It can be an expression of type Modular_Type, among other possibilities. So, the compiler chooses the "<" which has Modular_Type on both sides, right ? Then 10 ** 3 =3D 1000 =3D 232 (in the Modular_Type world) < 255 =3D E. E is larger, thus the FALSE. _________________________ Gautier's Ada programming http://sf.net/users/gdemont