* xfns.c (xpm_load) [!ALLOC_XPM_COLORS]: Declare local variable I in inner block.

[gnu-emacs] / src / fns.c

diff --git a/src/fns.c b/src/fns.c
index c03f7e3d7ede73352ec2795a132caee5d07c8576..8b31ef92a40210279374d817597f4af6532bc313 100644 (file)
--- a/src/fns.c
+++ b/src/fns.c
@@ -131,7 +131,7 @@ To get the number of bytes, use `string-bytes'")
   (sequence)
      register Lisp_Object sequence;
 {
-  register Lisp_Object tail, val;
+  register Lisp_Object val;
   register int i;
 
  retry:
@@ -1609,7 +1609,7 @@ to be sure of changing the value of `foo'.")
 {
   if (VECTORP (seq))
     {
-      EMACS_INT i, n, size;
+      EMACS_INT i, n;
 
       for (i = n = 0; i < ASIZE (seq); ++i)
        if (NILP (Fequal (AREF (seq, i), elt)))
@@ -3053,7 +3053,8 @@ If FILENAME is omitted, the printname of FEATURE is used as the file name,\n\
 but in this case `load' insists on adding the suffix `.el' or `.elc'.\n\
 If the optional third argument NOERROR is non-nil,\n\
 then return nil if the file is not found.\n\
-Normally the return value is FEATURE.")
+Normally the return value is FEATURE.\n\
+This normal messages at start and end of loading FILENAME are suppressed.")
   (feature, file_name, noerror)
      Lisp_Object feature, file_name, noerror;
 {