* gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.

[pf3gnuchains/gcc-fork.git] / libgfortran / generated / _tan_r10.F90

diff --git a/libgfortran/generated/_tan_r10.F90 b/libgfortran/generated/_tan_r10.F90
index d4c06ae..f2829e7 100644 (file)
--- a/libgfortran/generated/_tan_r10.F90
+++ b/libgfortran/generated/_tan_r10.F90
@@ -40,11 +40,11 @@
 #if defined (HAVE_GFC_REAL_10)
 #ifdef HAVE_TANL
 
-elemental function specific__tan_r10 (parm)
+elemental function _gfortran_specific__tan_r10 (parm)
    real (kind=10), intent (in) :: parm
-   real (kind=10) :: specific__tan_r10
+   real (kind=10) :: _gfortran_specific__tan_r10
 
-   specific__tan_r10 = tan (parm)
+   _gfortran_specific__tan_r10 = tan (parm)
 end function
 
 #endif