From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 22118 invoked by alias); 26 Nov 2001 20:37:09 -0000 Mailing-List: contact gdb-help@sourceware.cygnus.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-owner@sources.redhat.com Received: (qmail 22053 invoked from network); 26 Nov 2001 20:37:04 -0000 Received: from unknown (HELO mail2.thuntek.net) (206.206.98.15) by hostedprojects.ges.redhat.com with SMTP; 26 Nov 2001 20:37:04 -0000 Received: from icantbelieveimdoingthis.com (edwardsa-dsl.thuntek.net [206.206.97.132]) by mail2.thuntek.net (8.11.6/8.11.0) with ESMTP id fAQKb3f31410; Mon, 26 Nov 2001 13:37:03 -0700 (MST) (envelope-from edwards@icantbelieveimdoingthis.com) Message-ID: <3C02A11A.2040709@icantbelieveimdoingthis.com> Date: Wed, 14 Nov 2001 13:45:00 -0000 From: "Arthur H. Edwards,1,505-853-6042,505-256-0834" User-Agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:0.9.5) Gecko/20011014 X-Accept-Language: en-us MIME-Version: 1.0 To: gdb@sources.redhat.com, edwards@icantbelieveimdoingthis.com Subject: misrepresentation of complex numbers Content-Type: multipart/mixed; boundary="------------090800000001060000090707" X-SW-Source: 2001-11/txt/msg00156.txt.bz2 Message-ID: <20011114134500.csZUKmRxR_jjeKliaZ78xWsTm7OxUoHU-QlV1QqxOic@z> This is a multi-part message in MIME format. --------------090800000001060000090707 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit Content-length: 291 I attach a very simple code, testc.f that illustrates the bug in dbg. After compiling with the -g option stop the code at line 7 and issue the gdb command print s gdb will respond with $1 = (10,10) issue the cont command and you will see that the number should be 10, 4 Art Edwards --------------090800000001060000090707 Content-Type: text/plain; name="testc.f" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="testc.f" Content-length: 144 program t1 implicit real*8(a-h,o-z) complex*16 s a = 2*5.0d0 b = 2*2.0d0 s=cmplx(a,b) write(6,3555) s 3555 format(5x,d20.10) stop end --------------090800000001060000090707--