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,88394cd819fe3197 X-Google-Attributes: gid103376,public From: Marin David Condic Subject: Re: Legitimate Argument_Error Or Compiler Bug? Date: 2000/09/25 Message-ID: <39D00E4E.713E754B@acm.org>#1/1 X-Deja-AN: 674134871 Content-Transfer-Encoding: 7bit References: <39CFA126.6669BF45@acm.org> X-Accept-Language: en X-Server-Date: 26 Sep 2000 02:47:18 GMT Content-Type: text/plain; charset=us-ascii Organization: Quadrus Corporation Mime-Version: 1.0 Newsgroups: comp.lang.ada Date: 2000-09-26T02:47:18+00:00 List-Id: Marin David Condic wrote: > Alpha : Long_Long_Float := 0.05; > Log_Term : Long_Long_Float; > Neg_Log_Term : Long_Long_Float; > Power_Term : Long_Long_Float; > > -- > Ada.Text_Io.Put (" Log_Term ** 2.0 is (Argument_Error)") ; > Power_Term := Log_Term ** 2.0 ; -- Dies here! > Ada.Text_Io.Put_Line (Long_Long_Float'Image(Power_Term) ) ; > Oooops! Looks like I got the names wrong here. Log_Term is really negative. Howard Ludwig was kind enough to point out that this case runs into A.5.1(23) which says that Argument_Error will be raised when the left operand is negative. Mystery solved and thanks for the input. MDC -- ====================================================================== Marin David Condic - Quadrus Corporation - http://www.quadruscorp.com/ Send Replies To: m c o n d i c @ q u a d r u s c o r p . c o m Visit my web site at: http://www.mcondic.com/ "Because that's where they keep the money." -- Willie Sutton when asked why he robbed banks. ======================================================================