From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 15 Mar 2011 23:06:01 +0000 (-0700)
Subject: * data.c (default_value, arithcompare, arith_driver, arith_error): Now static.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~554^2~49
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=112396d6542186a88963e08828cd66f6d7fe9543;p=emacs.git

* data.c (default_value, arithcompare, arith_driver, arith_error): Now static.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index e2bff73bdb3..37e2183ef70 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -2,6 +2,7 @@
 
 	* data.c (Findirect_variable): Name an expression, to avoid
 	gcc -Wbad-function-cast warning.
+	(default_value, arithcompare, arith_driver, arith_error): Now static.
 
 	* alloc.c (check_cons_list): Do not define unless GC_CHECK_CONS_LIST.
 	(Fmake_vector, Fvector, Fmake_byte_code, Fgarbage_collect):
diff --git a/src/data.c b/src/data.c
index 288525cf5f5..81c16fff489 100644
--- a/src/data.c
+++ b/src/data.c
@@ -1272,7 +1272,7 @@ set_internal (register Lisp_Object symbol, register Lisp_Object newval, register
 /* Return the default value of SYMBOL, but don't check for voidness.
    Return Qunbound if it is void.  */
 
-Lisp_Object
+static Lisp_Object
 default_value (Lisp_Object symbol)
 {
   struct Lisp_Symbol *sym;
@@ -2219,7 +2219,7 @@ bool-vector.  IDX starts at 0.  */)
 
 enum comparison { equal, notequal, less, grtr, less_or_equal, grtr_or_equal };
 
-Lisp_Object
+static Lisp_Object
 arithcompare (Lisp_Object num1, Lisp_Object num2, enum comparison comparison)
 {
   double f1 = 0, f2 = 0;
@@ -2487,7 +2487,7 @@ enum arithop
 
 static Lisp_Object float_arith_driver (double, int, enum arithop,
                                        int, Lisp_Object *);
-Lisp_Object
+static Lisp_Object
 arith_driver (enum arithop code, int nargs, register Lisp_Object *args)
 {
   register Lisp_Object val;
@@ -3311,7 +3311,7 @@ syms_of_data (void)
   XSYMBOL (intern_c_string ("most-negative-fixnum"))->constant = 1;
 }
 
-SIGTYPE
+static SIGTYPE
 arith_error (int signo)
 {
   sigsetmask (SIGEMPTYMASK);