]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_aimag_c8.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _aimag_c8.F90
index 76ad7e982cac5da5e3cd1549623cab63c7c8a001..112c6882d8ecb1cc93d4b3bc2c0476671f46fb13 100644 (file)
 #if defined (HAVE_GFC_COMPLEX_8)
 
 
-elemental function specific__aimag_c8 (parm)
+elemental function _gfortran_specific__aimag_c8 (parm)
    complex (kind=8), intent (in) :: parm
-   real (kind=8) :: specific__aimag_c8
+   real (kind=8) :: _gfortran_specific__aimag_c8
 
-   specific__aimag_c8 = aimag (parm)
+   _gfortran_specific__aimag_c8 = aimag (parm)
 end function