OSDN Git Service

* gfortran.h (gfc_options_t): Add flag_allow_leading_underscore.
[pf3gnuchains/gcc-fork.git] / libgfortran / generated / _abs_r4.F90
index 31ef426..02ebd43 100644 (file)
 #if defined (HAVE_GFC_REAL_4)
 #ifdef HAVE_FABSF
 
-elemental function specific__abs_r4 (parm)
+elemental function _gfortran_specific__abs_r4 (parm)
    real (kind=4), intent (in) :: parm
-   real (kind=4) :: specific__abs_r4
+   real (kind=4) :: _gfortran_specific__abs_r4
 
-   specific__abs_r4 = abs (parm)
+   _gfortran_specific__abs_r4 = abs (parm)
 end function
 
 #endif