|
|
1.1 root 1: /* Copyright (c) 1979 Regents of the University of California */
2:
3: static char sccsid[] = "@(#)ROUND.c 1.3 3/7/81";
4:
5: long
6: ROUND(value)
7:
8: double value;
9: {
10: if (value >= 0.0)
11: return (long)(value + 0.5);
12: return (long)(value - 0.5);
13: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.