comparison src/bytecode.c @ 4966:48b63cd88a21

merge
author Ben Wing <ben@xemacs.org>
date Mon, 01 Feb 2010 14:11:36 -0600
parents e813cf16c015 6bc1f3f6cf0d
children cbe181529c34
comparison
equal deleted inserted replaced
4965:d79e9cc6aeca 4966:48b63cd88a21
328 } 328 }
329 329
330 330
331 /* We have our own two-argument versions of various arithmetic ops. 331 /* We have our own two-argument versions of various arithmetic ops.
332 Only two-argument arithmetic operations have their own byte codes. */ 332 Only two-argument arithmetic operations have their own byte codes. */
333 static int 333 int
334 bytecode_arithcompare (Lisp_Object obj1, Lisp_Object obj2) 334 bytecode_arithcompare (Lisp_Object obj1, Lisp_Object obj2)
335 { 335 {
336 #ifdef WITH_NUMBER_TYPES 336 #ifdef WITH_NUMBER_TYPES
337 switch (promote_args (&obj1, &obj2)) 337 switch (promote_args (&obj1, &obj2))
338 { 338 {