epics/pcas
0
0
Fork 0
Code Issues Pull Requests Projects Wiki Activity

umsigned => unsigned

Browse Source
This commit is contained in:
Jeff Hill
1996-09-16 22:55:01 +00:00
parent a5e1223b0c
commit 19f9d0c14d
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/ca/acctst.c
+6 -3
View File
@@ -7,6 +7,9 @@ static char *sccsId = "@(#) $Id$";
/*
* $Log$
* Revision 1.37 1996/09/16 16:31:01 jhill
* fixed NT warnings
*
* Revision 1.36 1996/07/24 21:55:33 jhill
* fixed gnu warnings
*
@@ -365,21 +368,21 @@ int doacctst(char *pname)
base = DBL_MIN;
for (i=DBL_MIN_EXP; i<DBL_MAX_EXP; i+=DBL_MAX_EXP/10) {
incr = ldexp (0.5,i);
iter = (umsigned long) (DBL_MAX/fabs(incr));
iter = (unsigned long) (DBL_MAX/fabs(incr));
iter = min (iter,10);
doubleTest(chix1, base, incr, epsil, iter);
}
base = DBL_MAX;
for (i=DBL_MIN_EXP; i<DBL_MAX_EXP; i+=DBL_MAX_EXP/10) {
incr = - ldexp (0.5,i);
iter = (umsigned long) (DBL_MAX/fabs(incr));
iter = (unsigned long) (DBL_MAX/fabs(incr));
iter = min (iter,10);
doubleTest(chix1, base, incr, epsil, iter);
}
base = - DBL_MAX;
for (i=DBL_MIN_EXP; i<DBL_MAX_EXP; i+=DBL_MAX_EXP/10) {
incr = ldexp (0.5,i);
iter = (umsigned long) (DBL_MAX/fabs(incr));
iter = (unsigned long) (DBL_MAX/fabs(incr));
iter = min (iter,10);
doubleTest(chix1, base, incr, epsil, iter);
}