]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_aimag_c10.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _aimag_c10.F90
index d6a6f0b863150580e19f5a42f08416c64102c16a..a406cff30a17ba6a980cf8d943feefec8c87c8ea 100644 (file)
 #if defined (HAVE_GFC_COMPLEX_10)
 
 
-elemental function specific__aimag_c10 (parm)
+elemental function _gfortran_specific__aimag_c10 (parm)
    complex (kind=10), intent (in) :: parm
-   real (kind=10) :: specific__aimag_c10
+   real (kind=10) :: _gfortran_specific__aimag_c10
 
-   specific__aimag_c10 = aimag (parm)
+   _gfortran_specific__aimag_c10 = aimag (parm)
 end function