diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-04-14 21:58:49 -0300 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2011-04-14 21:58:49 -0300 |
commit | 6c60eb9f2c4778c5fc07dd44b283edeb8583a3a0 (patch) | |
tree | b195b32210e199076e4287f6085f03b9407c44f2 /src | |
parent | dd19b04f04532ef0a38a40e37123d03998f18c4a (diff) | |
download | emacs-6c60eb9f2c4778c5fc07dd44b283edeb8583a3a0.tar.gz emacs-6c60eb9f2c4778c5fc07dd44b283edeb8583a3a0.tar.bz2 emacs-6c60eb9f2c4778c5fc07dd44b283edeb8583a3a0.zip |
* src/process.c (Qprocessp): Don't declare static.
* src/lisp.h (Qprocessp): Declare again.
Diffstat (limited to 'src')
-rw-r--r-- | src/ChangeLog | 5 | ||||
-rw-r--r-- | src/lisp.h | 3 | ||||
-rw-r--r-- | src/process.c | 4 |
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; |