diff options
| author | Richard M. Stallman | 1994-03-25 19:19:05 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-03-25 19:19:05 +0000 |
| commit | cf1bb91bd13b9e6c39be8f71f622bfb4a8b60179 (patch) | |
| tree | d722fe675f9bab90ac5b50cd4306ca7c9ba45738 /src/print.c | |
| parent | 6f5e9c436cd72386597be0bc5b11dfc4b78f6b6e (diff) | |
| download | emacs-cf1bb91bd13b9e6c39be8f71f622bfb4a8b60179.tar.gz emacs-cf1bb91bd13b9e6c39be8f71f622bfb4a8b60179.zip | |
(debug_print): New function.
Diffstat (limited to 'src/print.c')
| -rw-r--r-- | src/print.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/print.c b/src/print.c index 8e4a05fe3af..a5f1f97907f 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -598,6 +598,15 @@ to make it write to the debugging output.\n") | |||
| 598 | 598 | ||
| 599 | return character; | 599 | return character; |
| 600 | } | 600 | } |
| 601 | |||
| 602 | /* This is the interface for debugging printing. */ | ||
| 603 | |||
| 604 | void | ||
| 605 | debug_print (arg) | ||
| 606 | Lisp_Object arg; | ||
| 607 | { | ||
| 608 | Fprin1 (arg, Qexternal_debugging_output); | ||
| 609 | } | ||
| 601 | 610 | ||
| 602 | #ifdef LISP_FLOAT_TYPE | 611 | #ifdef LISP_FLOAT_TYPE |
| 603 | 612 | ||