diff options
| author | Jim Blandy | 1993-03-30 23:05:56 +0000 |
|---|---|---|
| committer | Jim Blandy | 1993-03-30 23:05:56 +0000 |
| commit | 5437e9f97e19ea0eba3288def1734e61a76ca3c7 (patch) | |
| tree | 8be32212f7335e07c582f04c0d5ea016a328117e /src/process.c | |
| parent | 9115e9389c75ae7f0da5743421aebb3977016e6d (diff) | |
| download | emacs-5437e9f97e19ea0eba3288def1734e61a76ca3c7.tar.gz emacs-5437e9f97e19ea0eba3288def1734e61a76ca3c7.zip | |
New macros NULL_DEVICE and EXEC_SUFFIXES, to give the name of the
equivalent of /dev/null, and the suffixes used by executable
files. This is simple, and helps people porting Emacs to other
operating systems.
* process.h (NULL_DEVICE): Give this a default value.
* process.c (Fstart_process): Pass EXEC_SUFFIXES to openp.
(Fprocess_send_eof): Use NULL_DEVICE instead of "/dev/null".
* callproc.c (Fcall_process): Pass EXEC_SUFFIXES to openp.
Use NULL_DEVICE instead of "/dev/null".
Diffstat (limited to 'src/process.c')
| -rw-r--r-- | src/process.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/process.c b/src/process.c index ed80460286a..d52f52bcdfd 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -1034,7 +1034,7 @@ Remaining arguments are strings to give program as arguments.") | |||
| 1034 | if (new_argv[0][0] != '/') | 1034 | if (new_argv[0][0] != '/') |
| 1035 | { | 1035 | { |
| 1036 | tem = Qnil; | 1036 | tem = Qnil; |
| 1037 | openp (Vexec_path, program, "", &tem, 1); | 1037 | openp (Vexec_path, program, EXEC_SUFFIXES, &tem, 1); |
| 1038 | if (NILP (tem)) | 1038 | if (NILP (tem)) |
| 1039 | report_file_error ("Searching for program", Fcons (program, Qnil)); | 1039 | report_file_error ("Searching for program", Fcons (program, Qnil)); |
| 1040 | new_argv[0] = XSTRING (tem)->data; | 1040 | new_argv[0] = XSTRING (tem)->data; |
| @@ -2597,7 +2597,7 @@ nil, indicating the current buffer's process.") | |||
| 2597 | else | 2597 | else |
| 2598 | { | 2598 | { |
| 2599 | close (XPROCESS (proc)->outfd); | 2599 | close (XPROCESS (proc)->outfd); |
| 2600 | XFASTINT (XPROCESS (proc)->outfd) = open ("/dev/null", O_WRONLY); | 2600 | XFASTINT (XPROCESS (proc)->outfd) = open (NULL_DEVICE, O_WRONLY); |
| 2601 | } | 2601 | } |
| 2602 | #endif /* VMS */ | 2602 | #endif /* VMS */ |
| 2603 | #endif /* did not do TOICREMOTE */ | 2603 | #endif /* did not do TOICREMOTE */ |