[Bug fortran/41258] New: internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[Bug fortran/41258] New: internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[jv244 at cam dot ac dot uk]

Fun testcase:

gfortran -c bug.f90
f951: internal compiler error: in find_typebound_proc_uop, at
fortran/symbol.c:4575
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions.

> cat bug.f90
TYPE qs_scf_env_type
   TYPE(preconditioner_p_type), DIMENSION(:), POINTER :: ot_preconditioner
END TYPE qs_scf_env_type
    TYPE(qs_scf_env_type), POINTER           :: scf_env
              CALL
destroy_preconditioner(scf_env%ot_preconditioner(i)%preconditioner,error=error)


-- 
           Summary: internal compiler error: in find_typebound_proc_uop, at
                    fortran/symbol.c:4575
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Keywords: ice-on-invalid-code
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: jv244 at cam dot ac dot uk


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[jv244 at cam dot ac dot uk]

------- Comment #1 from jv244 at cam dot ac dot uk  2009-09-04 13:11 -------
'reduced' testcase

> cat test.f90
TYPE a
  TYPE(b), DIMENSION(:), POINTER :: c
END TYPE
TYPE(a), POINTER :: d
CALL X(d%c%e)


-- 

jv244 at cam dot ac dot uk changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |d at domob dot eu


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[burnus at gcc dot gnu dot org]

------- Comment #2 from burnus at gcc dot gnu dot org  2009-09-04 14:30 -------
That's a regression with regards to 4.3. There one get's the following error
message. (I think the error messages would be clearer if they were reversed.)

ahjf.f90:5.12:

CALL X(d%c%e)
            1
Error: Derived type 'b' at (1) is being used before it is defined
ahjf.f90:2.37:

  TYPE(b), DIMENSION(:), POINTER :: c
                                     1
Error: The pointer component 'c' of 'a' at (1) is a type that has not been
declared


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
      Known to fail|                            |4.4.2 4.5.0
      Known to work|                            |4.3.4
           Priority|P3                          |P5
            Summary|internal compiler error: in |[4.4/4.5 Regression]
                   |find_typebound_proc_uop, at |internal compiler error: in
                   |fortran/symbol.c:4575       |find_typebound_proc_uop, at
                   |                            |fortran/symbol.c:4575
   Target Milestone|---                         |4.4.2


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[pault at gcc dot gnu dot org]

------- Comment #3 from pault at gcc dot gnu dot org  2009-09-05 11:36 -------
Created an attachment (id=18504)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=18504&action=view)
Fix for the PR

As soon as it has finished regtesting, I will commit as 'obvious'.

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |pault at gcc dot gnu dot org
                   |dot org                     |
             Status|UNCONFIRMED                 |ASSIGNED


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[pault at gcc dot gnu dot org]

------- Comment #4 from pault at gcc dot gnu dot org  2009-09-05 14:21 -------
Subject: Bug 41258

Author: pault
Date: Sat Sep  5 14:20:51 2009
New Revision: 151451

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=151451
Log:
2009-09-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/41258
        * primary.c (gfc_match_varspec): Do not look for typebound
        procedures unless the derived type has a f2k_derived namespace.

2009-09-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/41258
        * gfortran.dg/typebound_proc_12.f90 : New test.


Added:
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_12.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/primary.c
    trunk/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[pault at gcc dot gnu dot org]

------- Comment #5 from pault at gcc dot gnu dot org  2009-09-05 14:25 -------
Subject: Bug 41258

Author: pault
Date: Sat Sep  5 14:25:39 2009
New Revision: 151452

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=151452
Log:
2009-09-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/41258
        * primary.c (gfc_match_varspec): Do not look for typebound
        procedures unless the derived type has a f2k_derived namespace.

2009-09-05  Paul Thomas  <pault@gcc.gnu.org>

        PR fortran/41258
        * gfortran.dg/typebound_proc_12.f90 : New test.


Added:
    branches/gcc-4_4-branch/gcc/testsuite/gfortran.dg/typebound_proc_12.f90
Modified:
    branches/gcc-4_4-branch/gcc/fortran/ChangeLog
    branches/gcc-4_4-branch/gcc/fortran/primary.c
    branches/gcc-4_4-branch/gcc/testsuite/ChangeLog


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[pault at gcc dot gnu dot org]

------- Comment #6 from pault at gcc dot gnu dot org  2009-09-05 14:31 -------
Fixed on trunk and 4.4.

Joost, many thanks for the report.

Paul


-- 

pault at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258

[Bug fortran/41258] [4.4/4.5 Regression] internal compiler error: in find_typebound_proc_uop, at fortran/symbol.c:4575

[domob at gcc dot gnu dot org]

------- Comment #7 from domob at gcc dot gnu dot org  2009-09-06 16:16 -------
Thanks for fixing this, I guess this was my fault (without looking further)... 
I was away over the weekend, but should be able to do some hacking again now ;)


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=41258