diff src/lread.c @ 40656:cdfd4d09b79a

Update usage of CHECK_ macros (remove unused second argument).

--- a/src/lread.c	Fri Nov 02 20:14:02 2001 +0000
+++ b/src/lread.c	Fri Nov 02 20:46:55 2001 +0000
@@ -644,7 +644,7 @@
   fmode = "rt";
 #endif /* DOS_NT */
 
-  CHECK_STRING (file, 0);
+  CHECK_STRING (file);
 
   /* If file name is magic, call the handler.  */
   /* This shouldn't be necessary any more now that `openp' handles it right.
@@ -966,7 +966,7 @@
 
   for (tail = suffixes; CONSP (tail); tail = XCDR (tail))
     {
-      CHECK_STRING (XCAR (tail), 0);
+      CHECK_STRING (XCAR (tail));
       max_suffix_len = max (max_suffix_len,
 			    STRING_BYTES (XSTRING (XCAR (tail))));
     }
@@ -1450,13 +1450,13 @@
   int startval, endval;
   Lisp_Object tem;
 
-  CHECK_STRING (string,0);
+  CHECK_STRING (string);
 
   if (NILP (end))
     endval = XSTRING (string)->size;
   else
     {
-      CHECK_NUMBER (end, 2);
+      CHECK_NUMBER (end);
       endval = XINT (end);
       if (endval < 0 || endval > XSTRING (string)->size)
 	args_out_of_range (string, end);
@@ -1466,7 +1466,7 @@
     startval = 0;
   else
     {
-      CHECK_NUMBER (start, 1);
+      CHECK_NUMBER (start);
       startval = XINT (start);
       if (startval < 0 || startval > endval)
 	args_out_of_range (string, start);
@@ -2938,7 +2938,7 @@
   if (NILP (obarray)) obarray = Vobarray;
   obarray = check_obarray (obarray);
 
-  CHECK_STRING (string, 0);
+  CHECK_STRING (string);
 
   tem = oblookup (obarray, XSTRING (string)->data,
 		  XSTRING (string)->size,
@@ -2988,7 +2988,7 @@
 
   if (!SYMBOLP (name))
     {
-      CHECK_STRING (name, 0);
+      CHECK_STRING (name);
       string = XSTRING (name);
     }
   else
@@ -3020,7 +3020,7 @@
     XSETSTRING (string, XSYMBOL (name)->name);
   else
     {
-      CHECK_STRING (name, 0);
+      CHECK_STRING (name);
       string = name;
     }
 
@@ -3141,7 +3141,7 @@
 {
   register int i;
   register Lisp_Object tail;
-  CHECK_VECTOR (obarray, 1);
+  CHECK_VECTOR (obarray);
   for (i = XVECTOR (obarray)->size - 1; i >= 0; i--)
     {
       tail = XVECTOR (obarray)->contents[i];