BEAMnrc、DOSXYZnrc、以及BEAMDP程序的图形用户界面均
使用Tcl/Tk软件包来支持运行所以Tcl/Tk程序同样需要预先安装
代码片段和文件信息
/*
* 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.
*/
#include
#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(char * char **);
double
fixstrtod(
char *string
char **endPtr)
{
double d;
d = strtod(string endPtr);
if ((endPtr != NULL) && (*endPtr != string) && ((*endPtr)[-1] == 0)) {
*endPtr -= 1;
}
return d;
}
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请发送邮件举报,一经查实,本站将立刻删除。
评论列表(条)