Lines Matching refs:ALISP_OBJ_FLOAT
352 list_for_each(pos, &instance->used_objs_list[(long)in & ALISP_OBJ_PAIR_HASH_MASK][ALISP_OBJ_FLOAT]) {
403 obj = new_object(instance, ALISP_OBJ_FLOAT);
405 list_add(&obj->list, &instance->used_objs_list[(long)value & ALISP_OBJ_PAIR_HASH_MASK][ALISP_OBJ_FLOAT]);
1021 case ALISP_OBJ_FLOAT: return "float";
1149 if (type == ALISP_OBJ_FLOAT)
1153 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1156 type = ALISP_OBJ_FLOAT;
1231 if (type == ALISP_OBJ_FLOAT)
1236 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1239 type = ALISP_OBJ_FLOAT;
1274 if (type == ALISP_OBJ_FLOAT)
1278 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1280 type = ALISP_OBJ_FLOAT;
1319 if (type == ALISP_OBJ_FLOAT)
1325 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1328 type = ALISP_OBJ_FLOAT;
1378 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1380 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1425 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1427 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1464 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1466 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1503 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1505 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1542 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1544 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1581 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1583 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1690 case ALISP_OBJ_FLOAT:
1743 case ALISP_OBJ_FLOAT:
1838 case ALISP_OBJ_FLOAT:
2440 if (alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2460 if (alisp_compare_type(p, ALISP_OBJ_FLOAT))
2512 !alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2521 sprintf(s1, "%li", alisp_compare_type(p, ALISP_OBJ_FLOAT) ? (long)floor(p->value.f) : p->value.i);
2533 !alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2542 sprintf(s1, "%f", alisp_compare_type(p, ALISP_OBJ_FLOAT) ? p->value.f : (double)p->value.i);
3126 case ALISP_OBJ_FLOAT: