From b1349114e9a58791ee0d5e505e05633cc91293f3 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Wed, 16 Mar 2011 00:19:04 -0700 Subject: [PATCH] * callint.c (quotify_arg, quotify_args): Now static. --- src/ChangeLog | 2 ++ src/callint.c | 4 ++-- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index 88d05b56a0f..d87c1d0fbcb 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,7 @@ 2011-03-16 Paul Eggert + * 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 21dd3cd4d9d..af9ee5bb9bd 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; -- 2.39.2