Lines Matching refs:ALISP_OBJ_FLOAT
353 list_for_each(pos, &instance->used_objs_list[(long)in & ALISP_OBJ_PAIR_HASH_MASK][ALISP_OBJ_FLOAT]) {
404 obj = new_object(instance, ALISP_OBJ_FLOAT);
406 list_add(&obj->list, &instance->used_objs_list[(long)value & ALISP_OBJ_PAIR_HASH_MASK][ALISP_OBJ_FLOAT]);
1022 case ALISP_OBJ_FLOAT: return "float";
1150 if (type == ALISP_OBJ_FLOAT)
1154 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1157 type = ALISP_OBJ_FLOAT;
1232 if (type == ALISP_OBJ_FLOAT)
1237 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1240 type = ALISP_OBJ_FLOAT;
1275 if (type == ALISP_OBJ_FLOAT)
1279 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1281 type = ALISP_OBJ_FLOAT;
1320 if (type == ALISP_OBJ_FLOAT)
1326 } else if (alisp_compare_type(p1, ALISP_OBJ_FLOAT)) {
1329 type = ALISP_OBJ_FLOAT;
1379 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1381 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1426 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1428 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1465 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1467 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1504 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1506 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1543 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1545 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1582 alisp_compare_type(p1, ALISP_OBJ_FLOAT)) &&
1584 alisp_compare_type(p2, ALISP_OBJ_FLOAT))) {
1691 case ALISP_OBJ_FLOAT:
1744 case ALISP_OBJ_FLOAT:
1839 case ALISP_OBJ_FLOAT:
2441 if (alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2461 if (alisp_compare_type(p, ALISP_OBJ_FLOAT))
2513 !alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2522 sprintf(s1, "%li", alisp_compare_type(p, ALISP_OBJ_FLOAT) ? (long)floor(p->value.f) : p->value.i);
2534 !alisp_compare_type(p, ALISP_OBJ_FLOAT)) {
2543 sprintf(s1, "%f", alisp_compare_type(p, ALISP_OBJ_FLOAT) ? p->value.f : (double)p->value.i);
3127 case ALISP_OBJ_FLOAT: