Mercurial > emacs

diff src/mocklisp.c @ 40656:cdfd4d09b79a
Update usage of CHECK_ macros (remove unused second argument).
author: Pavel Jan?k <Pavel@Janik.cz>
date: Fri, 02 Nov 2001 20:46:55 +0000
parents: 2320f6ae3370
children: 7e3c616777d3
--- a/src/mocklisp.c	Fri Nov 02 20:14:02 2001 +0000
+++ b/src/mocklisp.c	Fri Nov 02 20:46:55 2001 +0000
@@ -125,7 +125,7 @@
 {
   if (EQ (Vmocklisp_arguments, Qinteractive))
     return Fread_string (prompt, Qnil, Qnil, Qnil, Qnil);
-  CHECK_NUMBER (n, 0);
+  CHECK_NUMBER (n);
   XSETINT (n, XINT (n) - 1);	/* Mocklisp likes to be origin-1 */
   return Fcar (Fnthcdr (n, Vmocklisp_arguments));
 }
@@ -189,9 +189,9 @@
      (string, from, to)
      Lisp_Object string, from, to;
 {
-  CHECK_STRING (string, 0);
-  CHECK_NUMBER (from, 1);
-  CHECK_NUMBER (to, 2);
+  CHECK_STRING (string);
+  CHECK_NUMBER (from);
+  CHECK_NUMBER (to);
 
   if (XINT (from) < 0)
     XSETINT (from, XINT (from) + XSTRING (string)->size);