gettimeofday: port recent C++ fix to Emacs

[gnulib.git] / lib / cosl.c

diff --git a/lib/cosl.c b/lib/cosl.c
index a3eaf39..d448548 100644 (file)
--- a/lib/cosl.c
+++ b/lib/cosl.c
@@ -28,12 +28,14 @@ cosl (long double x)
 
 #else
 
-/* sinl(x)
- * Return sine function of x.
+/* Code based on glibc/sysdeps/ieee754/ldbl-128/s_cosl.c.  */
+
+/* cosl(x)
+ * Return cosine function of x.
  *
  * kernel function:
  *      __kernel_sinl           ... sine function on [-pi/4,pi/4]
- *      __kernel_cosl           ... cose function on [-pi/4,pi/4]
+ *      __kernel_cosl           ... cosine function on [-pi/4,pi/4]
  *      __ieee754_rem_pio2l     ... argument reduction routine
  *
  * Method.