aboutsummaryrefslogtreecommitdiff
path: root/src/benchmarks/cfrac/podd.c
blob: def95b491360250e3ea514cae3644bb7a0aba0a0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#include "pdefs.h"
#include "precision.h"

/*
 * Returns non-zero if u is odd
 */
int podd(u)
   precision u;
{
   register int res;

   (void) pparm(u);
   res = (*(u->value) & 1);
   pdestroy(u);
   return res;
}