Mercurial > emacs
changeset 15707:303f5be100a9
(print): Fix args in strout calls.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Tue, 16 Jul 1996 05:39:06 +0000 |
| parents | bf891f379d9f |
| children | 1fb9ef6e1a9a |
| files | src/print.c |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/print.c Tue Jul 16 05:22:55 1996 +0000 +++ b/src/print.c Tue Jul 16 05:39:06 1996 +0000 @@ -1199,13 +1199,13 @@ break; case Lisp_Misc_Objfwd: - strout (buf, "#<objfwd to ", -1, printcharfun); + strout ("#<objfwd to ", -1, printcharfun); print (*XOBJFWD (obj)->objvar, printcharfun, escapeflag); PRINTCHAR ('>'); break; case Lisp_Misc_Buffer_Objfwd: - strout (buf, "#<buffer_objfwd to ", -1, printcharfun); + strout ("#<buffer_objfwd to ", -1, printcharfun); print (*(Lisp_Object *)((char *)current_buffer + XBUFFER_OBJFWD (obj)->offset), printcharfun, escapeflag); @@ -1213,7 +1213,7 @@ break; case Lisp_Misc_Kboard_Objfwd: - strout (buf, "#<kboard_objfwd to ", -1, printcharfun); + strout ("#<kboard_objfwd to ", -1, printcharfun); print (*(Lisp_Object *)((char *) current_kboard + XKBOARD_OBJFWD (obj)->offset), printcharfun, escapeflag);