diff options
| author | Joakim Verona | 2015-01-11 18:40:21 +0100 |
|---|---|---|
| committer | Joakim Verona | 2015-01-11 18:40:21 +0100 |
| commit | cc7cb20d6abc0f862e5513b24831bba0eaecaa5f (patch) | |
| tree | afc2fc05401504aa0c28699dc3bc155c5b0d7f58 /src/print.c | |
| parent | d972b504f30ff4300ba368940751e8736dddf0b4 (diff) | |
| parent | 9a57bda31569294ecaf8138a06e5edda9c0d87e3 (diff) | |
| download | emacs-cc7cb20d6abc0f862e5513b24831bba0eaecaa5f.tar.gz emacs-cc7cb20d6abc0f862e5513b24831bba0eaecaa5f.zip | |
merge master, fix conflicts
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/src/print.c b/src/print.c index d3ece334eb7..963979e809a 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -75,9 +75,6 @@ static ptrdiff_t print_buffer_pos; | |||
| 75 | /* Bytes stored in print_buffer. */ | 75 | /* Bytes stored in print_buffer. */ |
| 76 | static ptrdiff_t print_buffer_pos_byte; | 76 | static ptrdiff_t print_buffer_pos_byte; |
| 77 | 77 | ||
| 78 | Lisp_Object Qprint_escape_newlines; | ||
| 79 | static Lisp_Object Qprint_escape_multibyte, Qprint_escape_nonascii; | ||
| 80 | |||
| 81 | /* Vprint_number_table is a table, that keeps objects that are going to | 78 | /* Vprint_number_table is a table, that keeps objects that are going to |
| 82 | be printed, to allow use of #n= and #n# to express sharing. | 79 | be printed, to allow use of #n= and #n# to express sharing. |
| 83 | For any given object, the table can give the following values: | 80 | For any given object, the table can give the following values: |
| @@ -510,7 +507,7 @@ temp_output_buffer_setup (const char *bufname) | |||
| 510 | Ferase_buffer (); | 507 | Ferase_buffer (); |
| 511 | XSETBUFFER (buf, current_buffer); | 508 | XSETBUFFER (buf, current_buffer); |
| 512 | 509 | ||
| 513 | Frun_hooks (1, &Qtemp_buffer_setup_hook); | 510 | run_hook (Qtemp_buffer_setup_hook); |
| 514 | 511 | ||
| 515 | unbind_to (count, Qnil); | 512 | unbind_to (count, Qnil); |
| 516 | 513 | ||
| @@ -719,10 +716,6 @@ is used instead. */) | |||
| 719 | return object; | 716 | return object; |
| 720 | } | 717 | } |
| 721 | 718 | ||
| 722 | /* The subroutine object for external-debugging-output is kept here | ||
| 723 | for the convenience of the debugger. */ | ||
| 724 | Lisp_Object Qexternal_debugging_output; | ||
| 725 | |||
| 726 | DEFUN ("external-debugging-output", Fexternal_debugging_output, Sexternal_debugging_output, 1, 1, 0, | 719 | DEFUN ("external-debugging-output", Fexternal_debugging_output, Sexternal_debugging_output, 1, 1, 0, |
| 727 | doc: /* Write CHARACTER to stderr. | 720 | doc: /* Write CHARACTER to stderr. |
| 728 | You can call print while debugging emacs, and pass it this function | 721 | You can call print while debugging emacs, and pass it this function |
| @@ -2235,7 +2228,10 @@ print_interval (INTERVAL interval, Lisp_Object printcharfun) | |||
| 2235 | void | 2228 | void |
| 2236 | init_print_once (void) | 2229 | init_print_once (void) |
| 2237 | { | 2230 | { |
| 2231 | /* The subroutine object for external-debugging-output is kept here | ||
| 2232 | for the convenience of the debugger. */ | ||
| 2238 | DEFSYM (Qexternal_debugging_output, "external-debugging-output"); | 2233 | DEFSYM (Qexternal_debugging_output, "external-debugging-output"); |
| 2234 | |||
| 2239 | defsubr (&Sexternal_debugging_output); | 2235 | defsubr (&Sexternal_debugging_output); |
| 2240 | } | 2236 | } |
| 2241 | 2237 | ||