gfortran -c bug3.f90                              
bug3.f90: In function ‘set_value’:                              
bug3.f90:12: 
                
Please submit a full bug report,                              
with preprocessed source if appropriate.                              
See <URL:http://gcc.gnu.org/bugs.html> for 
instructions.                                           
--------------------------------------------------------------------------
                         

           
MODULE random_standard_normal_mod                                    
IMPLICIT NONE                                    
CONTAINS                              

!
********************************************************************            
                  

    
FUNCTION random_standard_normal()                                      
IMPLICIT NONE                                      
REAL :: aa, s, tt, u, ustar, w, y                                      
INTEGER :: i                                      
INTRINSIC FLOAT, INT, MIN                                      
REAL :: random_standard_normal                                      
y = 46.                                      
CALL set_value                                      
RETURN                                    
CONTAINS                                      
SUBROUTINE set_value                                        
IMPLICIT NONE                                        
random_standard_normal = y                                        
RETURN                                      
END SUBROUTINE set_value                                    
END FUNCTION random_standard_normal                              

!
*********************************************************************           
                  

     
END MODULE 
random_standard_normal_mod                                                      
      

-------------------------------------------------------------------------------
                    

          
gcc -v -save-temps -c bug3.f90                              
Reading specs from /usr/lib/gcc/i386-redhat-linux/3.4.3/specs   
Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --
infodir=/usr/share/info
--enable-shared --enable-threads=posix --disable-checking --with-system-zlib 
--enable-__cxa_atexit --disable-libunwind-exceptions 
--enable-java-awt=gtk --host=i386-redhat-linux                              
Thread model: posix                              
gcc version 3.4.3 20041212 (Red Hat 3.4.3-9.EL4)                              
gcc: bug3.f90: linker input file unused because linking not done

-- 
           Summary: internal compiler error: in gfc_conv_variable, at
                    fortran/trans-expr.c:319
           Product: gcc
           Version: 3.4.3
            Status: UNCONFIRMED
          Severity: critical
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: oona dot scotti at irsn dot fr
                CC: gcc-bugs at gcc dot gnu dot org,oona dot scotti at irsn
                    dot fr


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

Reply via email to