From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gdb-patches-return-40166-listarch-gdb-patches=sources.redhat.com@sources.redhat.com>
Received: (qmail 26368 invoked by alias); 1 Jul 2005 12:00:32 -0000
Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:gdb-patches-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/gdb-patches/>
List-Post: <mailto:gdb-patches@sources.redhat.com>
List-Help: <mailto:gdb-patches-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: gdb-patches-owner@sources.redhat.com
Received: (qmail 26348 invoked by uid 22791); 1 Jul 2005 12:00:27 -0000
Received: from ausmtp01.au.ibm.com (HELO ausmtp01.au.ibm.com) (202.81.18.186)
    by sourceware.org (qpsmtpd/0.30-dev) with ESMTP; Fri, 01 Jul 2005 12:00:27 +0000
Received: from sd0208e0.au.ibm.com (d23rh904.au.ibm.com [202.81.18.202])
	by ausmtp01.au.ibm.com (8.12.10/8.12.10) with ESMTP id j61C2res268536
	for <gdb-patches@sources.redhat.com>; Fri, 1 Jul 2005 22:02:56 +1000
Received: from d23av01.au.ibm.com (d23av01.au.ibm.com [9.190.250.242])
	by sd0208e0.au.ibm.com (8.12.10/NCO/VER6.6) with ESMTP id j61Bn6ji118226
	for <gdb-patches@sources.redhat.com>; Fri, 1 Jul 2005 22:03:10 +1000
Received: from d23av01.au.ibm.com (loopback [127.0.0.1])
	by d23av01.au.ibm.com (8.12.11/8.13.3) with ESMTP id j61A8QJZ003921
	for <gdb-patches@sources.redhat.com>; Fri, 1 Jul 2005 20:08:26 +1000
Received: from [9.181.134.93] ([9.181.134.93])
	by d23av01.au.ibm.com (8.12.11/8.12.11) with ESMTP id j61A8Oq3003851;
	Fri, 1 Jul 2005 20:08:25 +1000
Date: Fri, 01 Jul 2005 12:00:00 -0000
From: Wu Zhou <woodzltc@cn.ibm.com>
To: Nick Roberts <nickrob@snap.net.nz>
cc: Daniel Jacobowitz <drow@false.org>, gdb-patches@sources.redhat.com
Subject: Re: PATCH: Start Fortran support for variable objects.
In-Reply-To: <17092.51062.559020.560618@farnswood.snap.net.nz>
Message-ID: <Pine.LNX.4.63.0506300825570.13425@wks190384wss.cn.ibm.com>
References: <17091.4780.953681.620094@farnswood.snap.net.nz>
 <20050630131809.GB8241@nevyn.them.org> <17092.28833.284587.118362@farnswood.snap.net.nz>
 <Pine.LNX.4.63.0506300455390.11503@wks190384wss.cn.ibm.com>
 <17092.51062.559020.560618@farnswood.snap.net.nz>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
X-SW-Source: 2005-07/txt/msg00004.txt.bz2


> So I should have done:
> 
> (top-gdb) p TYPE_LOW_BOUND(var->type->main_type->fields->type)
> $1 = 1
> (top-gdb) p TYPE_HIGH_BOUND(var->type->main_type->fields->type)
> $2 = 4

Yes.  TYPE_LOW_BOUND is against the range_type.  So my guess is wrong 
indeed.  

Cheers
- Wu Zhou