diff options
| author | Jim Blandy | 1992-04-24 08:11:54 +0000 |
|---|---|---|
| committer | Jim Blandy | 1992-04-24 08:11:54 +0000 |
| commit | 4746118aca2d5cbdd054b4af4814d56550dfbc79 (patch) | |
| tree | 370e07c6950794f936bc8d434cb0560d883e4a0b /src/print.c | |
| parent | d4327fecc103493bc8275c3580b05c06c9fcc019 (diff) | |
| download | emacs-4746118aca2d5cbdd054b4af4814d56550dfbc79.tar.gz emacs-4746118aca2d5cbdd054b4af4814d56550dfbc79.zip | |
*** empty log message ***
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/print.c b/src/print.c index b65db9aedc6..8ab40735e38 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -1,11 +1,11 @@ | |||
| 1 | /* Lisp object printing and output streams. | 1 | /* Lisp object printing and output streams. |
| 2 | Copyright (C) 1985, 1986, 1988 Free Software Foundation, Inc. | 2 | Copyright (C) 1985, 1986, 1988, 1992 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| 5 | 5 | ||
| 6 | GNU Emacs is free software; you can redistribute it and/or modify | 6 | GNU Emacs is free software; you can redistribute it and/or modify |
| 7 | it under the terms of the GNU General Public License as published by | 7 | it under the terms of the GNU General Public License as published by |
| 8 | the Free Software Foundation; either version 1, or (at your option) | 8 | the Free Software Foundation; either version 2, or (at your option) |
| 9 | any later version. | 9 | any later version. |
| 10 | 10 | ||
| 11 | GNU Emacs is distributed in the hope that it will be useful, | 11 | GNU Emacs is distributed in the hope that it will be useful, |
| @@ -566,12 +566,12 @@ Output stream is STREAM, or value of `standard-output' (which see).") | |||
| 566 | for the convenience of the debugger. */ | 566 | for the convenience of the debugger. */ |
| 567 | Lisp_Object Qexternal_debugging_output; | 567 | Lisp_Object Qexternal_debugging_output; |
| 568 | 568 | ||
| 569 | DEFUN ("external-debugging-output", | 569 | DEFUN ("external-debugging-output", Fexternal_debugging_output, Sexternal_debugging_output, 1, 1, 0, |
| 570 | Fexternal_debugging_output, Sexternal_debugging_output, | 570 | "Write CHARACTER to stderr.\n\ |
| 571 | 1, 1, 0, "Write CHARACTER to stderr.\n\ | ||
| 572 | You can call print while debugging emacs, and pass it this function\n\ | 571 | You can call print while debugging emacs, and pass it this function\n\ |
| 573 | to make it write to the debugging output.\n") | 572 | to make it write to the debugging output.\n") |
| 574 | (Lisp_Object character) | 573 | (character) |
| 574 | Lisp_Object character; | ||
| 575 | { | 575 | { |
| 576 | CHECK_NUMBER (character, 0); | 576 | CHECK_NUMBER (character, 0); |
| 577 | putc (XINT (character), stderr); | 577 | putc (XINT (character), stderr); |