Merge from origin/emacs-25

[gnu-emacs] / src / fns.c

diff --git a/src/fns.c b/src/fns.c
index b21e93d109a6da5f73481d2794245bd11fb0c02a..5217b068882c1c169e97115b0b8f4c58bb4f5f41 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -34,8 +34,13 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 #include "intervals.h"
 #include "window.h"
 
+#if __GNUC__ >= 4
 static void sort_vector_copy (Lisp_Object, ptrdiff_t,
                              Lisp_Object [restrict], Lisp_Object [restrict]);
+#else
+static void sort_vector_copy (Lisp_Object, ptrdiff_t,
+                             Lisp_Object [], Lisp_Object []);
+#endif
 static bool internal_equal (Lisp_Object, Lisp_Object, int, bool, Lisp_Object);
 
 DEFUN ("identity", Fidentity, Sidentity, 1, 1, 0,