Commit a2928364 authored by Paul Eggert's avatar Paul Eggert
Browse files

Move editfns decls to lisp.h to check interfaces.

parent 63c5d10b
2011-03-16 Paul Eggert <eggert@cs.ucla.edu>
 
* 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.
* xrdb.c (get_system_name): Likewise.
* editfns.c (init_editfns, Fuser_login_name, Fuser_uid):
(Fuser_real_uid, Fuser_full_name): Remove unnecessary casts,
some of which prompt warnings from gcc -Wbad-function-cast.
......@@ -1391,8 +1391,6 @@ DEFUN ("system-name", Fsystem_name, Ssystem_name, 0, 0, 0,
return Vsystem_name;
}
/* For the benefit of callers who don't want to include lisp.h */
const char *
get_system_name (void)
{
......
......@@ -2874,6 +2874,7 @@ extern Lisp_Object safe_call2 (Lisp_Object, Lisp_Object, Lisp_Object);
extern void init_eval (void);
extern void syms_of_eval (void);
/* Defined in editfns.c */
extern Lisp_Object Qfield;
EXFUN (Fcurrent_message, 0);
EXFUN (Fgoto_char, 1);
......@@ -2913,6 +2914,8 @@ extern Lisp_Object make_buffer_string (EMACS_INT, EMACS_INT, int);
extern Lisp_Object make_buffer_string_both (EMACS_INT, EMACS_INT, EMACS_INT,
EMACS_INT, int);
extern void init_editfns (void);
const char *get_system_name (void);
const char *get_operating_system_release (void);
extern void syms_of_editfns (void);
EXFUN (Fconstrain_to_field, 5);
EXFUN (Ffield_end, 3);
......
......@@ -162,8 +162,6 @@ extern Lisp_Object QCfilter;
/* Define first descriptor number available for subprocesses. */
#define FIRST_PROC_DESC 3
extern const char *get_operating_system_release (void);
#ifndef HAVE_H_ERRNO
extern int h_errno;
#endif
......
......@@ -54,8 +54,6 @@ extern char *getenv (const char *);
extern struct passwd *getpwuid (uid_t);
extern struct passwd *getpwnam (const char *);
extern const char *get_system_name (void);
char *x_get_string_resource (XrmDatabase rdb, const char *name,
const char *class);
static int file_p (const char *filename);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment