diff options
| author | Eli Zaretskii | 2006-03-25 17:58:37 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2006-03-25 17:58:37 +0000 |
| commit | 945b01119fd383fd35b5d10d8d406d0ddaeec0ec (patch) | |
| tree | 1cbfc54e50f1b4a2ddd2ad4a701bd81afe299b49 /src | |
| parent | 1da6a64db82c50a051c41d338bcf771a85852f54 (diff) | |
| download | emacs-945b01119fd383fd35b5d10d8d406d0ddaeec0ec.tar.gz emacs-945b01119fd383fd35b5d10d8d406d0ddaeec0ec.zip | |
(print_output_debug_flag): New global variable.
(Fexternal_debugging_output) [WINDOWSNT]: Don't call OutputDebugString if
print_output_debug_flag is zero.
Diffstat (limited to 'src')
| -rw-r--r-- | src/print.c | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/print.c b/src/print.c index 622101f2c53..3a286361a8c 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -182,6 +182,9 @@ static int max_print; | |||
| 182 | 182 | ||
| 183 | void print_interval (); | 183 | void print_interval (); |
| 184 | 184 | ||
| 185 | /* GDB resets this to zero on W32 to disable OutputDebugString calls. */ | ||
| 186 | int print_output_debug_flag = 1; | ||
| 187 | |||
| 185 | 188 | ||
| 186 | /* Low level output routines for characters and strings */ | 189 | /* Low level output routines for characters and strings */ |
| 187 | 190 | ||
| @@ -909,10 +912,11 @@ to make it write to the debugging output. */) | |||
| 909 | 912 | ||
| 910 | #ifdef WINDOWSNT | 913 | #ifdef WINDOWSNT |
| 911 | /* Send the output to a debugger (nothing happens if there isn't one). */ | 914 | /* Send the output to a debugger (nothing happens if there isn't one). */ |
| 912 | { | 915 | if (print_output_debug_flag) |
| 913 | char buf[2] = {(char) XINT (character), '\0'}; | 916 | { |
| 914 | OutputDebugString (buf); | 917 | char buf[2] = {(char) XINT (character), '\0'}; |
| 915 | } | 918 | OutputDebugString (buf); |
| 919 | } | ||
| 916 | #endif | 920 | #endif |
| 917 | 921 | ||
| 918 | return character; | 922 | return character; |