(error): Prevent compiler warning.

diff --git a/src/eval.c b/src/eval.c
index 1e2065fa149fb524b7d9a0fe235bd24d0ec88595..269eb4e95b7053d8b1f2f6502a72d6441a7b1d90 100644 (file)
--- a/src/eval.c
+++ b/src/eval.c
@@ -1655,6 +1655,7 @@ error (m, a1, a2, a3)
     xfree (buffer);
 
   Fsignal (Qerror, Fcons (string, Qnil));
+  abort ();
 }
 \f
 DEFUN ("commandp", Fcommandp, Scommandp, 1, 1, 0,