PR libfortran/19308

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

diff --git a/libgfortran/generated/_cos_c8.f90 b/libgfortran/generated/_cos_c8.F90
similarity index 92%
rename from libgfortran/generated/_cos_c8.f90
rename to libgfortran/generated/_cos_c8.F90
index 68e1c70..d3daf6e 100644 (file)
--- a/libgfortran/generated/_cos_c8.f90
+++ b/libgfortran/generated/_cos_c8.F90
@@ -30,9 +30,22 @@
 !This file is machine generated.
 
 
+
+
+
+#include "config.h"
+#include "kinds.inc"
+#include "c99_protos.inc"
+
+#if defined (HAVE_GFC_COMPLEX_8)
+#ifdef HAVE_CCOS
+
 elemental function specific__cos_c8 (parm)
    complex (kind=8), intent (in) :: parm
    complex (kind=8) :: specific__cos_c8
 
    specific__cos_c8 = cos (parm)
 end function
+
+#endif
+#endif