diff options
author | Gerd Moellmann <gerd@gnu.org> | 2000-03-26 14:08:22 +0000 |
---|---|---|
committer | Gerd Moellmann <gerd@gnu.org> | 2000-03-26 14:08:22 +0000 |
commit | 4738999bc0e2d2be320916df725b3bbb283c249b (patch) | |
tree | f16e6428bebf6bb6a4a65a588c4ec437bf1367c2 /src/print.c | |
parent | 05beee0225b33865d9f9fc0701be25779ffca791 (diff) | |
download | emacs-4738999bc0e2d2be320916df725b3bbb283c249b.tar.gz |
(print_object): Use new macros for per-buffer
variables.
Diffstat (limited to 'src/print.c')
-rw-r--r-- | src/print.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/print.c b/src/print.c index 25e7f0a91ed..b53d137dd69 100644 --- a/src/print.c +++ b/src/print.c @@ -1772,9 +1772,9 @@ print_object (obj, printcharfun, escapeflag) case Lisp_Misc_Buffer_Objfwd: strout ("#<buffer_objfwd to ", -1, -1, printcharfun, 0); - print_object (*(Lisp_Object *)((char *)current_buffer - + XBUFFER_OBJFWD (obj)->offset), - printcharfun, escapeflag); + print_object (BUFFER_LOCAL_VALUE (current_buffer, + XBUFFER_OBJFWD (obj)->offset), + printcharfun, escapeflag); PRINTCHAR ('>'); break; @@ -1782,7 +1782,7 @@ print_object (obj, printcharfun, escapeflag) strout ("#<kboard_objfwd to ", -1, -1, printcharfun, 0); print_object (*(Lisp_Object *)((char *) current_kboard + XKBOARD_OBJFWD (obj)->offset), - printcharfun, escapeflag); + printcharfun, escapeflag); PRINTCHAR ('>'); break; |