gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.

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

diff --git a/libgfortran/generated/_sin_r8.F90 b/libgfortran/generated/_sin_r8.F90
index e35c3d1c25452527a9cb449742350fccfe417963..cb8e25772d90d8e43b79ced72aba144ca07982b0 100644 (file)
--- a/libgfortran/generated/_sin_r8.F90
+++ b/libgfortran/generated/_sin_r8.F90
@@ -40,11 +40,11 @@
 #if defined (HAVE_GFC_REAL_8)
 #ifdef HAVE_SIN
 
-elemental function specific__sin_r8 (parm)
+elemental function _gfortran_specific__sin_r8 (parm)
    real (kind=8), intent (in) :: parm
-   real (kind=8) :: specific__sin_r8
+   real (kind=8) :: _gfortran_specific__sin_r8
 
-   specific__sin_r8 = sin (parm)
+   _gfortran_specific__sin_r8 = sin (parm)
 end function
 
 #endif