]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_atan2_r8.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _atan2_r8.F90
index 752b16539873940d5caf447ac092e87297c4514b..ef83c9d28317558a750056c8eb68ed82b8ff9b03 100644 (file)
 
 #ifdef HAVE_ATAN2
 
-elemental function specific__atan2_r8 (p1, p2)
+elemental function _gfortran_specific__atan2_r8 (p1, p2)
    real (kind=8), intent (in) :: p1, p2
-   real (kind=8) :: specific__atan2_r8
+   real (kind=8) :: _gfortran_specific__atan2_r8
 
-   specific__atan2_r8 = atan2 (p1, p2)
+   _gfortran_specific__atan2_r8 = atan2 (p1, p2)
 end function
 
 #endif