Lines Matching defs:num1
2241 arithcompare (num1, num2, comparison)
2242 Lisp_Object num1, num2;
2248 CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (num1);
2251 if (FLOATP (num1) || FLOATP (num2))
2254 f1 = (FLOATP (num1)) ? XFLOAT_DATA (num1) : XINT (num1);
2261 if (floatp ? f1 == f2 : XINT (num1) == XINT (num2))
2266 if (floatp ? f1 != f2 : XINT (num1) != XINT (num2))
2271 if (floatp ? f1 < f2 : XINT (num1) < XINT (num2))
2276 if (floatp ? f1 <= f2 : XINT (num1) <= XINT (num2))
2281 if (floatp ? f1 > f2 : XINT (num1) > XINT (num2))
2286 if (floatp ? f1 >= f2 : XINT (num1) >= XINT (num2))
2297 (num1, num2)
2298 register Lisp_Object num1, num2;
2300 return arithcompare (num1, num2, equal);
2305 (num1, num2)
2306 register Lisp_Object num1, num2;
2308 return arithcompare (num1, num2, less);
2313 (num1, num2)
2314 register Lisp_Object num1, num2;
2316 return arithcompare (num1, num2, grtr);
2322 (num1, num2)
2323 register Lisp_Object num1, num2;
2325 return arithcompare (num1, num2, less_or_equal);
2331 (num1, num2)
2332 register Lisp_Object num1, num2;
2334 return arithcompare (num1, num2, grtr_or_equal);
2339 (num1, num2)
2340 register Lisp_Object num1, num2;
2342 return arithcompare (num1, num2, notequal);