gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.

[thirdparty/gcc.git] / libgfortran / generated / _cos_r8.F90

diff --git a/libgfortran/generated/_cos_r8.F90 b/libgfortran/generated/_cos_r8.F90
index d45a11aa33cd4e84c668c093160be3cf5c436b3b..0addadc26cc5509a78fa6e913a36d8a3801c81a0 100644 (file)
--- a/libgfortran/generated/_cos_r8.F90
+++ b/libgfortran/generated/_cos_r8.F90
@@ -40,11 +40,11 @@
 #if defined (HAVE_GFC_REAL_8)
 #ifdef HAVE_COS
 
-elemental function specific__cos_r8 (parm)
+elemental function _gfortran_specific__cos_r8 (parm)
    real (kind=8), intent (in) :: parm
-   real (kind=8) :: specific__cos_r8
+   real (kind=8) :: _gfortran_specific__cos_r8
 
-   specific__cos_r8 = cos (parm)
+   _gfortran_specific__cos_r8 = cos (parm)
 end function
 
 #endif