gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.

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

diff --git a/libgfortran/generated/_cos_r16.F90 b/libgfortran/generated/_cos_r16.F90
index 434639755c4849e1ba0d4c06a936d243be0bcfab..e23e7e737fb600982b087ee4a7d78adf3e12381f 100644 (file)
--- a/libgfortran/generated/_cos_r16.F90
+++ b/libgfortran/generated/_cos_r16.F90
@@ -40,11 +40,11 @@
 #if defined (HAVE_GFC_REAL_16)
 #ifdef HAVE_COSL
 
-elemental function specific__cos_r16 (parm)
+elemental function _gfortran_specific__cos_r16 (parm)
    real (kind=16), intent (in) :: parm
-   real (kind=16) :: specific__cos_r16
+   real (kind=16) :: _gfortran_specific__cos_r16
 
-   specific__cos_r16 = cos (parm)
+   _gfortran_specific__cos_r16 = cos (parm)
 end function
 
 #endif