aboutsummaryrefslogtreecommitdiffstats
path: root/src/fns.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/fns.c')
-rw-r--r--src/fns.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/fns.c b/src/fns.c
index 42e2eecf33e..de7fc1b47fc 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -38,7 +38,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
38 38
39static void sort_vector_copy (Lisp_Object, ptrdiff_t, 39static void sort_vector_copy (Lisp_Object, ptrdiff_t,
40 Lisp_Object *restrict, Lisp_Object *restrict); 40 Lisp_Object *restrict, Lisp_Object *restrict);
41static bool equal_no_quit (Lisp_Object, Lisp_Object);
42enum equal_kind { EQUAL_NO_QUIT, EQUAL_PLAIN, EQUAL_INCLUDING_PROPERTIES }; 41enum equal_kind { EQUAL_NO_QUIT, EQUAL_PLAIN, EQUAL_INCLUDING_PROPERTIES };
43static bool internal_equal (Lisp_Object, Lisp_Object, 42static bool internal_equal (Lisp_Object, Lisp_Object,
44 enum equal_kind, int, Lisp_Object); 43 enum equal_kind, int, Lisp_Object);
@@ -2121,7 +2120,7 @@ of strings. (`equal' ignores text properties.) */)
2121 Use this only on arguments that are cycle-free and not too large and 2120 Use this only on arguments that are cycle-free and not too large and
2122 are not window configurations. */ 2121 are not window configurations. */
2123 2122
2124static bool 2123bool
2125equal_no_quit (Lisp_Object o1, Lisp_Object o2) 2124equal_no_quit (Lisp_Object o1, Lisp_Object o2)
2126{ 2125{
2127 return internal_equal (o1, o2, EQUAL_NO_QUIT, 0, Qnil); 2126 return internal_equal (o1, o2, EQUAL_NO_QUIT, 0, Qnil);