summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog5
-rw-r--r--src/lisp.h3
-rw-r--r--src/process.c4
3 files changed, 9 insertions, 3 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 2b0df1f7a30..e3e6862f7e8 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2011-04-15 Stefan Monnier <monnier@iro.umontreal.ca>
+
+ * process.c (Qprocessp): Don't declare static.
+ * lisp.h (Qprocessp): Declare again.
+
2011-04-14 Paul Eggert <eggert@cs.ucla.edu>
Improve C-level modularity by making more things 'static'.
diff --git a/src/lisp.h b/src/lisp.h
index 8b8e25eb689..96c8e42995b 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -3194,12 +3194,13 @@ extern int inhibit_window_system;
/* Nonzero means that a filter or a sentinel is running. */
extern int running_asynch_code;
-/* Defined in process.c */
+/* Defined in process.c. */
extern Lisp_Object QCtype, Qlocal;
EXFUN (Fget_buffer_process, 1);
EXFUN (Fprocess_status, 1);
EXFUN (Fkill_process, 2);
EXFUN (Fwaiting_for_user_input_p, 0);
+extern Lisp_Object Qprocessp;
extern void kill_buffer_processes (Lisp_Object);
extern int wait_reading_process_output (int, int, int, int,
Lisp_Object,
diff --git a/src/process.c b/src/process.c
index 741f2e363f3..e9ac324845b 100644
--- a/src/process.c
+++ b/src/process.c
@@ -24,7 +24,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
#include <stdio.h>
#include <errno.h>
#include <setjmp.h>
-#include <sys/types.h> /* some typedefs are used in sys/file.h */
+#include <sys/types.h> /* Some typedefs are used in sys/file.h. */
#include <sys/file.h>
#include <sys/stat.h>
#include <setjmp.h>
@@ -127,7 +127,7 @@ int inhibit_sentinels;
#ifdef subprocesses
-static Lisp_Object Qprocessp;
+Lisp_Object Qprocessp;
static Lisp_Object Qrun, Qstop, Qsignal;
static Lisp_Object Qopen, Qclosed, Qconnect, Qfailed, Qlisten;
Lisp_Object Qlocal;