[Bug fortran/33759] Unequal character lengths in MERGE intrinsic not detected at run time

["pault at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #3 from pault at gcc dot gnu dot org  2007-10-23 15:52 -------
(In reply to comment #2)
...snip...
> Now I have another odd result: the following code
...snip...
>     print *, size(transfer(string,"xy",len(string)))

I believe that gfortran is incorrect:

In implementing "If the physical representation of the result is longer than
that of SOURCE, the physical representation of the leading part is that of
SOURCE and the remainder is undefined." I took the number of elements in result
to be the physical size of source.

However, "Case (iii): If SIZE is present, the result is array valued of rank
one and size SIZE." is nothing if not clear!

I'll figure out how to fix it.

Cheers

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|NEW                         |ASSIGNED
   Last reconfirmed|2007-10-12 20:54:19         |2007-10-23 15:52:17
               date|                            |


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