From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 9355 invoked by alias); 22 Jul 2009 08:38:23 -0000 Received: (qmail 9265 invoked by uid 48); 22 Jul 2009 08:38:10 -0000 Date: Wed, 22 Jul 2009 08:38:00 -0000 Message-ID: <20090722083810.9264.qmail@sourceware.org> X-Bugzilla-Reason: CC References: Subject: [Bug fortran/40728] Bogus error "Error: Can't convert UNKNOWN to REAL(8) at (1)" In-Reply-To: Reply-To: gcc-bugzilla@gcc.gnu.org To: gcc-bugs@gcc.gnu.org From: "burnus 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: 2009-07/txt/msg01710.txt.bz2 ------- Comment #3 from burnus at gcc dot gnu dot org 2009-07-22 08:38 ------- Found it: In "resolve_function" one has: switch (procedure_kind (sym)) { case PTYPE_GENERIC: ... case PTYPE_SPECIFIC: ... case PTYPE_UNKNOWN: ... The correct branch would be "PTYPE_UNKNOWN", which correctly give the error. But "procedure_kind" calls "generic_sym", which in turns calls: if (sym->attr.generic || (sym->attr.intrinsic && gfc_generic_intrinsic (sym->name))) return 1; The gfc_generic_intrinsic justs checks: sym = gfc_find_function (name); return (sym == NULL) ? 0 : sym->generic; Expected: In the latter, one needs to add a gfc_check_intrinsic_standard (sym, NULL, true, Analogously for: gfc_specific_intrinsic. -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40728