Function: car-less-than-car
car-less-than-car is a function defined in fileio.c.
Signature
(car-less-than-car A B)
Documentation
Return t if (car A) is numerically less than (car B).
Source Code
// Defined in /usr/src/emacs/src/fileio.c
{
Lisp_Object ca = Fcar (a), cb = Fcar (b);
if (FIXNUMP (ca) && FIXNUMP (cb))
return XFIXNUM (ca) < XFIXNUM (cb) ? Qt : Qnil;
return arithcompare (ca, cb) & Cmp_LT ? Qt : Qnil;
}