]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_exp_r10.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _exp_r10.F90
index 86bf749943a8aec6ea7fe2b5bc376c45d6de5f0a..03e8fa02902ae0e993cc2ea036965380e783f6b9 100644 (file)
 #if defined (HAVE_GFC_REAL_10)
 #ifdef HAVE_EXPL
 
-elemental function specific__exp_r10 (parm)
+elemental function _gfortran_specific__exp_r10 (parm)
    real (kind=10), intent (in) :: parm
-   real (kind=10) :: specific__exp_r10
+   real (kind=10) :: _gfortran_specific__exp_r10
 
-   specific__exp_r10 = exp (parm)
+   _gfortran_specific__exp_r10 = exp (parm)
 end function
 
 #endif