public inbox for gcc-bugs@sourceware.org help / color / mirror / Atom feed
From: "sfilippone at uniroma2 dot it" <gcc-bugzilla@gcc.gnu.org> To: gcc-bugs@gcc.gnu.org Subject: [Bug fortran/41656] [OOP] Unresolved GENERIC Date: Sun, 11 Oct 2009 18:19:00 -0000 [thread overview] Message-ID: <20091011181920.13499.qmail@sourceware.org> (raw) In-Reply-To: <bug-41656-9410@http.gcc.gnu.org/bugzilla/> [-- Warning: decoded text below may be mangled, UTF-8 assumed --] [-- Attachment #1: Type: text/plain, Size: 1365 bytes --] ------- Comment #3 from sfilippone at uniroma2 dot it 2009-10-11 18:19 ------- (In reply to comment #2) Hi Paul, Seems to work as advertised, in that it takes out the errors it's supposed to cure. On my full application I now get this: psb_s_mat_mod.f03:1345.45: allocate(altmp, source=mold,stat=info) 1 Error: Using SOURCE= with a class variable at (1) not supported yet psb_s_mat_mod.f03: In function s_sizeof: psb_s_mat_mod.f03:152:0: error: case labels not sorted: case 1: is greater than case 1: but comes before it. psb_s_mat_mod.f03:152:0: internal compiler error: verify_flow_info failed Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions. The SOURCE= error is clear enough, but the other is interesting, because it happens in one of the cases that gave rise to PR 41648, line 152 is the end of this function function s_sizeof(a) result(res) implicit none class(psb_s_sparse_mat), intent(in) :: a integer(psb_long_int_k_) :: res res = 0 if (allocated(a%a)) then res = a%a%sizeof() end if end function s_sizeof Since you say you want to take them both.... do you need access to the full source code? Regards Salvatore -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41656
next prev parent reply other threads:[~2009-10-11 18:19 UTC|newest] Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top 2009-10-10 12:52 [Bug fortran/41656] New: " sfilippone at uniroma2 dot it 2009-10-10 12:53 ` [Bug fortran/41656] " sfilippone at uniroma2 dot it 2009-10-11 16:06 ` pault at gcc dot gnu dot org 2009-10-11 18:19 ` sfilippone at uniroma2 dot it [this message] 2009-10-12 13:44 ` sfilippone at uniroma2 dot it 2009-10-13 9:07 ` sfilippone at uniroma2 dot it 2009-10-16 6:07 ` pault at gcc dot gnu dot org 2009-10-16 6:09 ` pault at gcc dot gnu dot org
Reply instructions: You may reply publicly to this message via plain-text email using any one of the following methods: * Save the following mbox file, import it into your mail client, and reply-to-all from there: mbox Avoid top-posting and favor interleaved quoting: https://en.wikipedia.org/wiki/Posting_style#Interleaved_style * Reply using the --to, --cc, and --in-reply-to switches of git-send-email(1): git send-email \ --in-reply-to=20091011181920.13499.qmail@sourceware.org \ --to=gcc-bugzilla@gcc.gnu.org \ --cc=gcc-bugs@gcc.gnu.org \ /path/to/YOUR_REPLY https://kernel.org/pub/software/scm/git/docs/git-send-email.html * If your mail client supports setting the In-Reply-To header via mailto: links, try the mailto: linkBe sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).