diff options
Diffstat (limited to 'usr/src/lib/libbc/libc/gen/common/strtod.c')
-rw-r--r-- | usr/src/lib/libbc/libc/gen/common/strtod.c | 59 |
1 files changed, 0 insertions, 59 deletions
diff --git a/usr/src/lib/libbc/libc/gen/common/strtod.c b/usr/src/lib/libbc/libc/gen/common/strtod.c deleted file mode 100644 index fa551c76f1..0000000000 --- a/usr/src/lib/libbc/libc/gen/common/strtod.c +++ /dev/null @@ -1,59 +0,0 @@ -/* - * CDDL HEADER START - * - * The contents of this file are subject to the terms of the - * Common Development and Distribution License, Version 1.0 only - * (the "License"). You may not use this file except in compliance - * with the License. - * - * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE - * or http://www.opensolaris.org/os/licensing. - * See the License for the specific language governing permissions - * and limitations under the License. - * - * When distributing Covered Code, include this CDDL HEADER in each - * file and include the License file at usr/src/OPENSOLARIS.LICENSE. - * If applicable, add the following below this CDDL HEADER, with the - * fields enclosed by brackets "[]" replaced with your own identifying - * information: Portions Copyright [yyyy] [name of copyright owner] - * - * CDDL HEADER END - */ -#pragma ident "%Z%%M% %I% %E% SMI" - -/* - * Copyright (c) 1987 by Sun Microsystems, Inc. - */ - -#include <errno.h> -#include <stdio.h> -#include <values.h> -#include <floatingpoint.h> - -double -strtod(cp, ptr) - char *cp; - char **ptr; -{ - double x; - decimal_mode mr; - decimal_record dr; - fp_exception_field_type fs; - enum decimal_string_form form; - char *pechar; - - string_to_decimal(&cp, MAXINT, 0, &dr, &form, &pechar); - if (ptr != (char **) NULL) - *ptr = cp; - if (form == invalid_form) - return 0.0; /* Shameful kluge for SVID's sake. */ - mr.rd = fp_direction; - decimal_to_double(&x, &mr, &dr, &fs); - if (fs & (1 << fp_overflow)) { /* Overflow. */ - errno = ERANGE; - } - if (fs & (1 << fp_underflow)) { /* underflow */ - errno = ERANGE; - } - return x; -} |