[Bug fortran/34765] New: erroneous intrinsic assignment call

[Bug fortran/34765] New: erroneous intrinsic assignment call

[damian at rouson dot net]

The attached code demonstrates several circumstances wherein gfortran executes
an intrinsic assignment of a derived type when a defined (overloaded)
assignment is required.  Specifically, the subroutines
"complex_array_equals_Field()" and "field_equals_Field()" in the Field_Class
module (file field.f90) should be called for the assignments near the text
"gfortran_bug" in the file statistics.f90.


-- 
           Summary: erroneous intrinsic assignment call
           Product: gcc
           Version: 4.3.0
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: damian at rouson dot net
 GCC build triplet: i686-pc-linux-gnu
  GCC host triplet: i686-pc-linux-gnu
GCC target triplet: i686-pc-linux-gnu


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

[Bug fortran/34765] erroneous intrinsic assignment call

[damian at rouson dot net]

------- Comment #1 from damian at rouson dot net  2008-01-13 01:24 -------
Created an attachment (id=14933)
 --> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=14933&action=view)
Please see the README file in the attached bzipped archive & search the file
disperse.out for the text "gfortran_bug".


-- 


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

[Bug fortran/34765] erroneous intrinsic assignment call

[kargl at gcc dot gnu dot org]

------- Comment #2 from kargl at gcc dot gnu dot org  2008-01-13 04:59 -------
Does NR/ contain Numerical Recipes code?  If so, you've just
posted copyrighted code to public database.


-- 


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

[Bug fortran/34765] erroneous intrinsic assignment call

[burnus at gcc dot gnu dot org]

------- Comment #3 from burnus at gcc dot gnu dot org  2008-01-13 10:26 -------
It would be great, if you could create a minimal example; I still do not fully
understand what is not working. I get the same output using gfortran, the Intel
Fortran Compiler 10.1 and g95.

Or at least give an example how the output/variable is different than expected;
I don't want to dig through the whole program, while you seemingly already did
so to pinpoint the problem.


-- 


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

[Bug fortran/34765] erroneous intrinsic assignment call

[burnus at gcc dot gnu dot org]

------- Comment #4 from burnus at gcc dot gnu dot org  2008-01-13 10:34 -------
I modified now FUNCTION fluid_Statistics to read as follows:

   205        print *, 'BEFORE'
   206        v1 = velocity(1)
   207        PRINT *,'AFTER gfortran_bug: the line above this should indicate
the termination of a call to complex_array_equals_Field()'
   208  stop

and added print statements at the beginning/end of complex_array_equals_Field.
The result:

 BEFORE
 ENTER: complex_array_equals_Field
 LEAVE: complex_array_equals_Field
 AFTER gfortran_bug: the line above this should indicate the termination of a
call to complex_array_equals_Field()

Thus I do not understand the comment. Please elaborate.


-- 

burnus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |WAITING


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

[Bug fortran/34765] erroneous intrinsic assignment call

[damian at rouson dot net]

-- 

damian at rouson dot net changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|WAITING                     |UNCONFIRMED


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

[Bug fortran/34765] erroneous intrinsic assignment call

[damian at rouson dot net]

------- Comment #5 from damian at rouson dot net  2008-01-13 16:40 -------
I was trying to demonstrate multiple instances of the bug.  Based on comment
#4, I realize that the compiler performed correctly in at least 3 of the 4
instances. I will now attempt to verify whether the 4th instance is actually a
bug.  My apologies about the other three.


-- 


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

[Bug fortran/34765] erroneous intrinsic assignment call

[damian at rouson dot net]

------- Comment #6 from damian at rouson dot net  2008-01-13 17:59 -------
It turns out this is not a gfortran bug.  My apologies for any time wasted.


-- 

damian at rouson dot net changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |damian at rouson dot net


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

[Bug fortran/34765] erroneous intrinsic assignment call

[burnus at gcc dot gnu dot org]

------- Comment #7 from burnus at gcc dot gnu dot org  2008-01-13 22:10 -------
> It turns out this is not a gfortran bug.  My apologies for any time wasted.
Closing then as invalid. Thanks for re-checking.


-- 

burnus at gcc dot gnu dot org changed:

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


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