comparison src/extents.c @ 4962:e813cf16c015

merge
author Ben Wing <ben@xemacs.org>
date Mon, 01 Feb 2010 05:29:05 -0600
parents 19a72041c5ed 6ef8256a020a
children 0d4c9d0f6a8d
comparison
equal deleted inserted replaced
4961:b90f8cf474e0 4962:e813cf16c015
3412 } 3412 }
3413 3413
3414 /* compare the random elements of the plists. */ 3414 /* compare the random elements of the plists. */
3415 return !plists_differ (extent_no_chase_plist (e1), 3415 return !plists_differ (extent_no_chase_plist (e1),
3416 extent_no_chase_plist (e2), 3416 extent_no_chase_plist (e2),
3417 0, 0, depth + 1); 3417 0, 0, depth + 1, 0);
3418 } 3418 }
3419 3419
3420 static int 3420 static int
3421 extent_equal (Lisp_Object obj1, Lisp_Object obj2, int depth) 3421 extent_equal (Lisp_Object obj1, Lisp_Object obj2, int depth,
3422 int UNUSED (foldcase))
3422 { 3423 {
3423 struct extent *e1 = XEXTENT (obj1); 3424 struct extent *e1 = XEXTENT (obj1);
3424 struct extent *e2 = XEXTENT (obj2); 3425 struct extent *e2 = XEXTENT (obj2);
3425 return 3426 return
3426 (extent_start (e1) == extent_start (e2) && 3427 (extent_start (e1) == extent_start (e2) &&