aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorJuanma Barranquero2010-07-26 02:43:58 +0200
committerJuanma Barranquero2010-07-26 02:43:58 +0200
commit7d383292d10b876efec43e77fd51c2665e912688 (patch)
tree11fc86516ca0f359bf0d4808308ef7b277794b58 /src
parentda31e629b630248e9e89a00516a6f8c0572abee8 (diff)
downloademacs-7d383292d10b876efec43e77fd51c2665e912688.tar.gz
emacs-7d383292d10b876efec43e77fd51c2665e912688.zip
* lread.c (unreadpure, mapatoms_1): Make static.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog4
-rw-r--r--src/lread.c6
2 files changed, 6 insertions, 4 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index f099fc3437d..3a18722d662 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
12010-07-26 Juanma Barranquero <lekktu@gmail.com>
2
3 * lread.c (unreadpure, mapatoms_1): Make static.
4
12010-07-25 Juanma Barranquero <lekktu@gmail.com> 52010-07-25 Juanma Barranquero <lekktu@gmail.com>
2 6
3 * terminfo.c (tparam): Fix prototype of tparm. 7 * 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. */)
1276 1276
1277static Lisp_Object 1277static Lisp_Object
1278load_unwind (Lisp_Object arg) /* used as unwind-protect function in load */ 1278load_unwind (Lisp_Object arg) /* used as unwind-protect function in load */
1279
1280{ 1279{
1281 FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer; 1280 FILE *stream = (FILE *) XSAVE_VALUE (arg)->pointer;
1282 if (stream != NULL) 1281 if (stream != NULL)
@@ -1567,9 +1566,8 @@ build_load_history (Lisp_Object filename, int entire)
1567 Vload_history); 1566 Vload_history);
1568} 1567}
1569 1568
1570Lisp_Object 1569static Lisp_Object
1571unreadpure (Lisp_Object junk) /* Used as unwind-protect function in readevalloop */ 1570unreadpure (Lisp_Object junk) /* Used as unwind-protect function in readevalloop */
1572
1573{ 1571{
1574 read_pure = 0; 1572 read_pure = 0;
1575 return Qnil; 1573 return Qnil;
@@ -3818,7 +3816,7 @@ map_obarray (Lisp_Object obarray, void (*fn) (Lisp_Object, Lisp_Object), Lisp_Ob
3818 } 3816 }
3819} 3817}
3820 3818
3821void 3819static void
3822mapatoms_1 (Lisp_Object sym, Lisp_Object function) 3820mapatoms_1 (Lisp_Object sym, Lisp_Object function)
3823{ 3821{
3824 call1 (function, sym); 3822 call1 (function, sym);