From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 16888 invoked by alias); 13 Apr 2007 18:05:45 -0000 Received: (qmail 15541 invoked by uid 48); 13 Apr 2007 18:05:28 -0000 Date: Fri, 13 Apr 2007 18:05:00 -0000 Message-ID: <20070413180528.15534.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/31564] Error: Type/rank mismatch in argument In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "kargl at gcc dot gnu dot org" Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Archive: List-Post: List-Help: Sender: gcc-bugs-owner@gcc.gnu.org X-SW-Source: 2007-04/txt/msg00946.txt.bz2 ------- Comment #1 from kargl at gcc dot gnu dot org 2007-04-13 19:05 ------- The code is illegal, but in accordance with the error message. You need to set WHICH to 1 via either INTEGER :: which = 1 or which = 1 This however doesn't fix the problem. If you change the call to CALL set_bound(the_beta%parameters(1)) then it compiles. So, it looks as if gfortran isn't properly evaluating the derived type arguments. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31564