Lines Matching defs:bigratio
1370 mpr *bigratio;
1472 bigratio = NULL;
1496 bigratio = LispMalloc(sizeof(mpr));
1497 mpr_init(bigratio);
1498 mpi_seti(mpr_num(bigratio), integer);
1499 mpi_setstr(mpr_den(bigratio), ratio, radix);
1503 bigratio = LispMalloc(sizeof(mpr));
1504 mpr_init(bigratio);
1505 mpi_set(mpr_num(bigratio), bignum);
1508 mpi_setstr(mpr_den(bigratio), ratio, radix);
1511 if (bigratio) {
1512 mpr_canonicalize(bigratio);
1513 if (mpi_fiti(mpr_num(bigratio)) &&
1514 mpi_fiti(mpr_den(bigratio))) {
1515 integer = mpi_geti(mpr_num(bigratio));
1516 denominator = mpi_geti(mpr_den(bigratio));
1517 mpr_clear(bigratio);
1518 LispFree(bigratio);
1525 number = BIGRATIO(bigratio);