Mercurial > hg > xemacs-beta
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) && |