* callint.c (quotify_arg, quotify_args): Now static.

2 files changed, 4 insertions, 2 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 88d05b56a0..d87c1d0fbc 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-03-16  Paul Eggert  <[email protected]>
 
+	* callint.c (quotify_arg, quotify_args): Now static.
+
 	* lisp.h (get_system_name, get_operating_system_release):
 	Move decls here, to check interfaces.
 	* process.c (get_operating_system_release): Move decl to lisp.h.
diff --git a/src/callint.c b/src/callint.c
index 21dd3cd4d9..af9ee5bb9b 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -118,7 +118,7 @@ usage: (interactive &optional ARGS)  */)
 
 /* Quotify EXP: if EXP is constant, return it.
    If EXP is not constant, return (quote EXP).  */
-Lisp_Object
+static Lisp_Object
 quotify_arg (register Lisp_Object exp)
 {
   if (!INTEGERP (exp) && !STRINGP (exp)
@@ -129,7 +129,7 @@ quotify_arg (register Lisp_Object exp)
 }
 
 /* Modify EXP by quotifying each element (except the first).  */
-Lisp_Object
+static Lisp_Object
 quotify_args (Lisp_Object exp)
 {
   register Lisp_Object tail;