|
|
1.1 root 1: #include "mprec.h"
2:
3:
4: /*
5: * Zerop returns a TRUE or FALSE depending on wether or not
6: * the mint pointed to by "a" is zero.
7: */
8:
9: zerop(a)
10: register mint *a;
11: {
12: return (a->len == 1 && *a->val == 0);
13: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.