diff options
Diffstat (limited to 'src/eval.c')
-rw-r--r-- | src/eval.c | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/src/eval.c b/src/eval.c index e82fba1559e..a030ff8b700 100644 --- a/src/eval.c +++ b/src/eval.c @@ -1,5 +1,5 @@ /* Evaluator for GNU Emacs Lisp interpreter. - Copyright (C) 1985, 1986, 1987 Free Software Foundation, Inc. + Copyright (C) 1985, 1986, 1987, 1992 Free Software Foundation, Inc. This file is part of GNU Emacs. @@ -1837,7 +1837,11 @@ Thus, (funcall 'cons 'x 'y) returns (x . y).") goto done; default: - error ("funcall: this number of args not handled."); + + /* If a subr takes more than 6 arguments without using MANY + or UNEVALLED, we need to extend this function to support it. + Until this is done, there is no way to call the function. */ + abort (); } } if (XTYPE (fun) == Lisp_Compiled) |