diff options
| author | Stefan Kangas | 2024-06-09 20:58:08 +0200 |
|---|---|---|
| committer | Stefan Kangas | 2024-06-09 20:58:08 +0200 |
| commit | a1a4c6dccbe7aeeac97635df54797ebf6c0ce789 (patch) | |
| tree | d2ddb9a5a4ffd200f6ecfd8ba15b0f89ea896335 /src/process.c | |
| parent | b91b81957c52306b68b9c122311eb6463343e539 (diff) | |
| download | emacs-a1a4c6dccbe7aeeac97635df54797ebf6c0ce789.tar.gz emacs-a1a4c6dccbe7aeeac97635df54797ebf6c0ce789.zip | |
Unbreak build with Clang 15 on macOS 14.5
* src/process.c (read_process_output): Use EQ for comparison.
(syms_of_process): Properly set a DEFVAR_BOOL to 'true' instead of 'Qt'.
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 524ee1dfa5a..9670be64279 100644 --- a/src/process.c +++ b/src/process.c | |||
| @@ -6263,7 +6263,7 @@ read_process_output (Lisp_Object proc, int channel) | |||
| 6263 | friends don't expect current-buffer to be changed from under them. */ | 6263 | friends don't expect current-buffer to be changed from under them. */ |
| 6264 | record_unwind_current_buffer (); | 6264 | record_unwind_current_buffer (); |
| 6265 | 6265 | ||
| 6266 | if (read_process_output_fast && p->filter == Qinternal_default_process_filter) | 6266 | if (read_process_output_fast && EQ (p->filter, Qinternal_default_process_filter)) |
| 6267 | read_and_insert_process_output (p, chars, nbytes, coding); | 6267 | read_and_insert_process_output (p, chars, nbytes, coding); |
| 6268 | else | 6268 | else |
| 6269 | read_and_dispose_of_process_output (p, chars, nbytes, coding); | 6269 | read_and_dispose_of_process_output (p, chars, nbytes, coding); |
| @@ -8884,7 +8884,7 @@ On GNU/Linux systems, the value should not exceed | |||
| 8884 | We skip calling `internal-default-process-filter' and don't allocate | 8884 | We skip calling `internal-default-process-filter' and don't allocate |
| 8885 | the Lisp string that would be used as its argument. Only affects the | 8885 | the Lisp string that would be used as its argument. Only affects the |
| 8886 | case of asynchronous process with the default filter. */); | 8886 | case of asynchronous process with the default filter. */); |
| 8887 | read_process_output_fast = Qt; | 8887 | read_process_output_fast = true; |
| 8888 | 8888 | ||
| 8889 | DEFVAR_INT ("process-error-pause-time", process_error_pause_time, | 8889 | DEFVAR_INT ("process-error-pause-time", process_error_pause_time, |
| 8890 | doc: /* The number of seconds to pause after handling process errors. | 8890 | doc: /* The number of seconds to pause after handling process errors. |