From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 26 Jul 2010 00:43:58 +0000 (+0200)
Subject: * lread.c (unreadpure, mapatoms_1): Make static.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~49^2~136^2
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7d383292d10b876efec43e77fd51c2665e912688;p=emacs.git

* lread.c (unreadpure, mapatoms_1): Make static.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index f099fc3437d..3a18722d662 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2010-07-26  Juanma Barranquero  <lekktu@gmail.com>
+
+	* lread.c (unreadpure, mapatoms_1): Make static.
+
 2010-07-25  Juanma Barranquero  <lekktu@gmail.com>
 
 	* terminfo.c (tparam): Fix prototype of tparm.
diff --git a/src/lread.c b/src/lread.c
index 96108ec4a72..b29971a5f88 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1276,7 +1276,6 @@ Return t if the file exists and loads successfully.  */)
 
 static Lisp_Object
 load_unwind (Lisp_Object arg)  /* used as unwind-protect function in load */
-                     
 {
   FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer;
   if (stream != NULL)
@@ -1567,9 +1566,8 @@ build_load_history (Lisp_Object filename, int entire)
 			   Vload_history);
 }
 
-Lisp_Object
+static Lisp_Object
 unreadpure (Lisp_Object junk) /* Used as unwind-protect function in readevalloop */
-                      
 {
   read_pure = 0;
   return Qnil;
@@ -3818,7 +3816,7 @@ map_obarray (Lisp_Object obarray, void (*fn) (Lisp_Object, Lisp_Object), Lisp_Ob
     }
 }
 
-void
+static void
 mapatoms_1 (Lisp_Object sym, Lisp_Object function)
 {
   call1 (function, sym);