diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2019-01-03 16:59:39 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2019-01-03 16:59:39 (GMT) |
commit | 647e9b1a5bcfafcb6c4545e2e4fb43cf93ef1ef6 (patch) | |
tree | 50a89ee846e1d9c62f15ddb6e3cd4f11f4f03f0f /tls/fixstrtod.c | |
parent | 5e1dd715a2321e1e8a756f70b7b0a488b1e55bb9 (diff) | |
download | blt-647e9b1a5bcfafcb6c4545e2e4fb43cf93ef1ef6.zip blt-647e9b1a5bcfafcb6c4545e2e4fb43cf93ef1ef6.tar.gz blt-647e9b1a5bcfafcb6c4545e2e4fb43cf93ef1ef6.tar.bz2 |
update TEA 3.13
Diffstat (limited to 'tls/fixstrtod.c')
-rw-r--r-- | tls/fixstrtod.c | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/tls/fixstrtod.c b/tls/fixstrtod.c deleted file mode 100644 index 2655767..0000000 --- a/tls/fixstrtod.c +++ /dev/null @@ -1,38 +0,0 @@ -/* - * fixstrtod.c -- - * - * Source code for the "fixstrtod" procedure. This procedure is - * used in place of strtod under Solaris 2.4, in order to fix - * a bug where the "end" pointer gets set incorrectly. - * - * Copyright (c) 1995 Sun Microsystems, Inc. - * - * See the file "license.terms" for information on usage and redistribution - * of this file, and for a DISCLAIMER OF ALL WARRANTIES. - * - * SCCS: @(#) fixstrtod.c 1.5 96/02/15 12:08:21 - */ - -#include <stdio.h> - -#undef strtod - -/* - * Declare strtod explicitly rather than including stdlib.h, since in - * somes systems (e.g. SunOS 4.1.4) stdlib.h doesn't declare strtod. - */ - -extern double strtod(); - -double -fixstrtod(string, endPtr) - char *string; - char **endPtr; -{ - double d; - d = strtod(string, endPtr); - if ((endPtr != NULL) && (*endPtr != string) && ((*endPtr)[-1] == 0)) { - *endPtr -= 1; - } - return d; -} |