[Bug fortran/22101] New: use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[Bug fortran/22101] New: use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[d dot m dot Ingram at MMU dot ac dot uk]

Compilation of the attached F90 module which uses liked lists, causes the following error message to 
appear repeatedly. removing the use of => null() to initialise the pointers causes comilation to suceed. 
The code compiles sucesfully under compac visual fortran on a PC and Pro Fortran on an SGI system.

The output from "gfortran -v -save-temps -c CutCellRoutines.f90" is

Using built-in specs.
Target: powerpc-apple-darwin7.8.0
Configured with: ../gcc/configure --prefix=/usr/local/gfortran --enable-languages=c,f95
Thread model: posix
gcc version 4.1.0 20050325 (experimental)
 /usr/local/gfortran/libexec/gcc/powerpc-apple-darwin7.8.0/4.1.0/f951 CutCellRoutines.f90 -fPIC 
-quiet -dumpbase CutCellRoutines.f90 -auxbase CutCellRoutines -version -o CutCellRoutines.s
GNU F95 version 4.1.0 20050325 (experimental) (powerpc-apple-darwin7.8.0)
        compiled by GNU C version 3.3 20030304 (Apple Computer, Inc. build 1640).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
 In file CutCellRoutines.f90:35

  type solid_body_node
                     1
Error: Pointer assignment target is neither TARGET nor POINTER at (1)
 In file CutCellRoutines.f90:35

  type solid_body_node
                     1
Error: Pointer assignment target is neither TARGET nor POINTER at (1)
 In file CutCellRoutines.f90:35

(*** error repeated 8 times ***)

-- 
           Summary: use of type(x), pointer:: next => null() causes
                    compilation to fail with a spurious error message
           Product: gcc
           Version: 4.1.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: d dot m dot Ingram at MMU dot ac dot uk
                CC: gcc-bugs at gcc dot gnu dot org
 GCC build triplet: powerpc-apple-darwin7.8.0
  GCC host triplet: powerpc-apple-darwin7.8.0
GCC target triplet: powerpc-apple-darwin7.8.0


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

[Bug fortran/22101] use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[d dot m dot Ingram at MMU dot ac dot uk]

------- Additional Comments From d dot m dot Ingram at MMU dot ac dot uk  2005-06-17 06:08 -------
Created an attachment (id=9103)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=9103&action=view)
Fortran source which causes the error


-- 


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

[Bug fortran/22101] use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[pinskia at gcc dot gnu dot org]

------- Additional Comments From pinskia at gcc dot gnu dot org  2005-06-17 14:47 -------
This is most likely the same bug as PR 16606 or PR 21370 but since I have not reduced it yet, I don't 
know which one for sure. 

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
  BugsThisDependsOn|                            |16606, 21370


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

[Bug fortran/22101] use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[fxcoudert at gcc dot gnu dot org]

------- Additional Comments From fxcoudert at gcc dot gnu dot org  2005-06-18 18:31 -------
Reduction of this one:

  type solid
    integer :: i = 0
  end type solid
  type(solid), pointer :: a
  end

so, this is indeed PR 16606. Thanks for reporting!

*** This bug has been marked as a duplicate of 16606 ***

-- 
           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |RESOLVED
         Resolution|                            |DUPLICATE


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

[Bug fortran/22101] use of type(x), pointer:: next => null() causes compilation to fail with a spurious error message

[reichelt at gcc dot gnu dot org]

-- 
Bug 22101 depends on bug 16606, which changed state.

Bug 16606 Summary: gfortran error with a valid derived type definition
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=16606

           What    |Old Value                   |New Value
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|                            |DUPLICATE

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