------- Comment #1 from pinskia at gcc dot gnu dot org  2008-01-18 11:48 -------
Reduced testcase:
module krmod
contains
 function doit()
   implicit none
    real :: doit1(100)
    real :: doit
    doit1 = tm_doit()
   return
 end function doit
 function tm_doit(genloc)
   implicit none
   character, optional  :: genloc
   real :: tm_doit(100)
 end function tm_doit
end module krmod


----
The optional argument has to be a character type and the return type has to be
an array


-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Severity|major                       |normal
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
   GCC host triplet|x86_64-unknown-linux-gnu    |
 GCC target triplet|x86_64-unknown-linux-gnu    |
           Keywords|                            |ice-on-invalid-code
   Last reconfirmed|0000-00-00 00:00:00         |2008-01-18 11:48:37
               date|                            |
            Summary|internal compiler error:    |internal compiler error with
                   |Segmentation fault/optional |optional argument of
                   |arguments                   |character type and array
                   |                            |return type


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

Reply via email to