]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_abs_c4.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _abs_c4.F90
index 6def6b1ae61c5d66ac73dce41265fdbeae530dbc..bc25d6e4a239ffe694cf56703edfe3c036944b2c 100644 (file)
 #if defined (HAVE_GFC_COMPLEX_4)
 #ifdef HAVE_CABSF
 
-elemental function specific__abs_c4 (parm)
+elemental function _gfortran_specific__abs_c4 (parm)
    complex (kind=4), intent (in) :: parm
-   real (kind=4) :: specific__abs_c4
+   real (kind=4) :: _gfortran_specific__abs_c4
 
-   specific__abs_c4 = abs (parm)
+   _gfortran_specific__abs_c4 = abs (parm)
 end function
 
 #endif