From 38b7304e932d52c8a4b250f35a1c8bcf6805d8ca Mon Sep 17 00:00:00 2001 From: Denis Vlasenko Date: Mon, 22 Dec 2008 15:58:54 +0000 Subject: libm/*: mass removal of: 1. static char rcsid[] = "$NetBSD: ..." 2. /* @(#)s_scalbn.c 5.1 93/09/24 */ 3. #ifdef __STDC__ No code changes (verified with objdump) --- libm/s_significand.c | 13 +------------ 1 file changed, 1 insertion(+), 12 deletions(-) (limited to 'libm/s_significand.c') diff --git a/libm/s_significand.c b/libm/s_significand.c index 100ac0889..8c74ce24b 100644 --- a/libm/s_significand.c +++ b/libm/s_significand.c @@ -1,4 +1,3 @@ -/* @(#)s_signif.c 5.1 93/09/24 */ /* * ==================================================== * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. @@ -10,10 +9,6 @@ * ==================================================== */ -#if defined(LIBM_SCCS) && !defined(lint) -static char rcsid[] = "$NetBSD: s_significand.c,v 1.6 1995/05/10 20:48:11 jtc Exp $"; -#endif - /* * significand(x) computes just * scalb(x, (double) -ilogb(x)), @@ -23,13 +18,7 @@ static char rcsid[] = "$NetBSD: s_significand.c,v 1.6 1995/05/10 20:48:11 jtc Ex #include "math.h" #include "math_private.h" - -#ifdef __STDC__ - double significand(double x) -#else - double significand(x) - double x; -#endif +double significand(double x) { return __ieee754_scalb(x,(double) -ilogb(x)); } -- cgit v1.2.3