Commit c3279ad4 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(print_object): Use new macros for per-buffer

variables.
parent 6f598a6d
...@@ -1772,9 +1772,9 @@ print_object (obj, printcharfun, escapeflag) ...@@ -1772,9 +1772,9 @@ print_object (obj, printcharfun, escapeflag)
case Lisp_Misc_Buffer_Objfwd: case Lisp_Misc_Buffer_Objfwd:
strout ("#<buffer_objfwd to ", -1, -1, printcharfun, 0); strout ("#<buffer_objfwd to ", -1, -1, printcharfun, 0);
print_object (*(Lisp_Object *)((char *)current_buffer print_object (BUFFER_LOCAL_VALUE (current_buffer,
+ XBUFFER_OBJFWD (obj)->offset), XBUFFER_OBJFWD (obj)->offset),
printcharfun, escapeflag); printcharfun, escapeflag);
PRINTCHAR ('>'); PRINTCHAR ('>');
break; break;
...@@ -1782,7 +1782,7 @@ print_object (obj, printcharfun, escapeflag) ...@@ -1782,7 +1782,7 @@ print_object (obj, printcharfun, escapeflag)
strout ("#<kboard_objfwd to ", -1, -1, printcharfun, 0); strout ("#<kboard_objfwd to ", -1, -1, printcharfun, 0);
print_object (*(Lisp_Object *)((char *) current_kboard print_object (*(Lisp_Object *)((char *) current_kboard
+ XKBOARD_OBJFWD (obj)->offset), + XKBOARD_OBJFWD (obj)->offset),
printcharfun, escapeflag); printcharfun, escapeflag);
PRINTCHAR ('>'); PRINTCHAR ('>');
break; break;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment