diff options
Diffstat (limited to 'src/fns.c')
| -rw-r--r-- | src/fns.c | 3 |
1 files changed, 1 insertions, 2 deletions
| @@ -38,7 +38,6 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 38 | 38 | ||
| 39 | static void sort_vector_copy (Lisp_Object, ptrdiff_t, | 39 | static void sort_vector_copy (Lisp_Object, ptrdiff_t, |
| 40 | Lisp_Object *restrict, Lisp_Object *restrict); | 40 | Lisp_Object *restrict, Lisp_Object *restrict); |
| 41 | static bool equal_no_quit (Lisp_Object, Lisp_Object); | ||
| 42 | enum equal_kind { EQUAL_NO_QUIT, EQUAL_PLAIN, EQUAL_INCLUDING_PROPERTIES }; | 41 | enum equal_kind { EQUAL_NO_QUIT, EQUAL_PLAIN, EQUAL_INCLUDING_PROPERTIES }; |
| 43 | static bool internal_equal (Lisp_Object, Lisp_Object, | 42 | static 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 | ||
| 2124 | static bool | 2123 | bool |
| 2125 | equal_no_quit (Lisp_Object o1, Lisp_Object o2) | 2124 | equal_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); |