From 5593f7e37bb18a99ab6f4197d95140fc4bd47784 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Tue, 26 Aug 1997 11:42:33 +0000 Subject: [PATCH] (DEFUN_ARGS_8): New macro. (Fcompleting_read, Fread_from_minibuffer, Fread_string, Fread_no_blanks_input): Number of arguments fixed. --- src/lisp.h | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/src/lisp.h b/src/lisp.h index 29ca0d3e27..281196f403 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -1222,6 +1222,8 @@ typedef unsigned char UCHAR; Lisp_Object, Lisp_Object) #define DEFUN_ARGS_7 (Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object, \ Lisp_Object, Lisp_Object, Lisp_Object) +#define DEFUN_ARGS_8 (Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object, \ + Lisp_Object, Lisp_Object, Lisp_Object, Lisp_Object) #endif /* defsubr (Sname); @@ -1921,14 +1923,14 @@ EXFUN (Fmatch_end, 1); /* defined in minibuf.c */ extern Lisp_Object last_minibuf_string; -EXFUN (Fcompleting_read, 7); -EXFUN (Fread_from_minibuffer, 6); +EXFUN (Fcompleting_read, 8); +EXFUN (Fread_from_minibuffer, 7); EXFUN (Fread_variable, 2); EXFUN (Fread_buffer, 3); EXFUN (Fread_minibuffer, 2); EXFUN (Feval_minibuffer, 2); -EXFUN (Fread_string, 4); -EXFUN (Fread_no_blanks_input, 2); +EXFUN (Fread_string, 5); +EXFUN (Fread_no_blanks_input, 3); extern Lisp_Object get_minibuffer P_ ((int)); /* Defined in callint.c */ -- 2.20.1