ualarm
[unix-history] / usr / src / lib / libc / gen / frexp.c
index 39bb58e..8790cc0 100644 (file)
@@ -1,13 +1,16 @@
-/* @(#)frexp.c 4.2 (Berkeley) %G% */
+#if defined(LIBC_SCCS) && !defined(lint)
+static char sccsid[] = "@(#)frexp.c    5.2 (Berkeley) %G%";
+#endif LIBC_SCCS and not lint
+
 /*
 /*
      the call
              x = frexp(arg,&exp);
      must return a double fp quantity x which is <1.0
      and the corresponding binary exponent "exp".
      such that
              arg = x*2^exp
      if the argument is 0.0, return 0.0 mantissa and 0 exponent.
-*/
*     the call
*             x = frexp(arg,&exp);
*     must return a double fp quantity x which is <1.0
*     and the corresponding binary exponent "exp".
*     such that
*             arg = x*2^exp
*     if the argument is 0.0, return 0.0 mantissa and 0 exponent.
+ */
 
 double
 frexp(x,i)
 
 double
 frexp(x,i)