Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
a2928364
Commit
a2928364
authored
Mar 15, 2011
by
Paul Eggert
Browse files
Move editfns decls to lisp.h to check interfaces.
parent
63c5d10b
Changes
5
Hide whitespace changes
Inline
Side-by-side
Showing
5 changed files
with
7 additions
and
6 deletions
+7
-6
src/ChangeLog
src/ChangeLog
+4
-0
src/editfns.c
src/editfns.c
+0
-2
src/lisp.h
src/lisp.h
+3
-0
src/process.c
src/process.c
+0
-2
src/xrdb.c
src/xrdb.c
+0
-2
No files found.
src/ChangeLog
View file @
a2928364
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.
src/editfns.c
View file @
a2928364
...
...
@@ -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
)
{
...
...
src/lisp.h
View file @
a2928364
...
...
@@ -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
);
...
...
src/process.c
View file @
a2928364
...
...
@@ -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
...
...
src/xrdb.c
View file @
a2928364
...
...
@@ -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
);
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment