]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_log10_r4.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _log10_r4.F90
index c772527ae861d56d61b77cc73fba2f464640226b..bcadf2417ee216cd0aacb1d1bc05ef7e30fe1a66 100644 (file)
 #if defined (HAVE_GFC_REAL_4)
 #ifdef HAVE_LOG10F
 
-elemental function specific__log10_r4 (parm)
+elemental function _gfortran_specific__log10_r4 (parm)
    real (kind=4), intent (in) :: parm
-   real (kind=4) :: specific__log10_r4
+   real (kind=4) :: _gfortran_specific__log10_r4
 
-   specific__log10_r4 = log10 (parm)
+   _gfortran_specific__log10_r4 = log10 (parm)
 end function
 
 #endif