]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - libgfortran/generated/_cos_c8.F90
gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[thirdparty/gcc.git] / libgfortran / generated / _cos_c8.F90
index d3daf6e1360d3450db5163d8dbea9d3cc4832234..6a7d1fa07e639905d5852799ba64296ab8bd6d3d 100644 (file)
 #if defined (HAVE_GFC_COMPLEX_8)
 #ifdef HAVE_CCOS
 
-elemental function specific__cos_c8 (parm)
+elemental function _gfortran_specific__cos_c8 (parm)
    complex (kind=8), intent (in) :: parm
-   complex (kind=8) :: specific__cos_c8
+   complex (kind=8) :: _gfortran_specific__cos_c8
 
-   specific__cos_c8 = cos (parm)
+   _gfortran_specific__cos_c8 = cos (parm)
 end function
 
 #endif